
71486 02661 



■ Communications 



■ EPROM Burner by Kitsz ■ 3-DR 

■ More Summer Project Winners 






Computerware® Hit Parade... 




Poor Jr must overcome four 
screens to rescue The King from 
Luigi. Traverse the jungle & 
swamp, climb vines, avoid vine 
gators, dodge Zuzu birds, open 
locks, & conquer Luigi's hideout. 

32K C 528.95 32K D $31.95 




Use speed, skill, & concentration to 
race your car over the track, dodge 
competitors, & beat the clock. Taste 
the road dust, smell burning 
rubber, feel the press of speed on 
your chest! 

32K C $21.95 32K D $24.95 




Big league graphicsl Two players 
against each other or one can prac- 
tice offense against the computer. 

7 defensive & 8 offensive plays 
plus many formations. 

32K C $26.95 32K D $29.95 



The Sourcerer 




This menu driven symbolic 6809 
disassembler produces symbolic 
source code that can be assembled. 
Automatic equate generation. FCC, 
FCB, & FDB generation. Written in 
position independent code, it is 
relocatable to any memory area. 
User defined symbol/ label area. 
Produces files with or without line 
numbers. Can symbolize all extend- 
ed addresses if desired. Written in 
assembly language for extreme 
speed. Disassemble to disk or 
cassette, printer, or screen. 

16K C$34.95 16KD $39.95 




A serious health aid for biofeed- 
back training & a fun family game 
for "truth detection"! Real silver 
velcro finger grips attach to the 
detector box that plugs into the 
joystick slot. Now watch & listen to 
the galvanic skin response being 
graphed on the screen. An impres- 
sive experience for a friend who 
asks "what does your computer 
do?" All hardware. Bio Feedback 
program & Anxiety Attack game 
included. (Results not admissable in 
court!) (Req. 16K) 

$34.95 




From the cockpit of your ship, see 
the real 3-D field of hyper space. 
Dodge oncoming space debris & 
destroy attackers as they whiz past. 
A new dimension in space gamesl 

32K C$26.95 32KD $29.95 




Travel through different time 
zones, fending off attacking craft 
from each period with a full 360 
degree firing range. See blimps, 
helicopters, & all kinds of space 
vehicles. 

32K C $26.95 32K D $29.95 




He jumps across pyramids of 
brightly colored cubes, dodges 
springs & bad eggs, using elevator 
squares, & gaining points as he 
clears the cubes towards the next 
screen. 

32K C $26.95 32K D $29.95 



Flexi Filer 

Comprehensive & flexible data 
base manager. Collect up to 35 
fields with up to 240 characters 
per record using your own names & 
format. With logical operators 
select any subset of records using up 
to 36 different criteria. Sort all or 
any subset of records in ascending 
or descending order on any of the 
35 fields, with a fast assembly 
language sort. Design customized 
labels & reports with automatic 
page numbers, page headings, & 
totals of numeric fields. 

32K D $64.95 




Your landing craft rolls over the 
surface with its tractors, hops over 
craters & rocks, & phasers attacking 
aliens to get to home base. Super 
graphics & soundl 

32K C $24.96 32K D $27.95 



Color Basic 
Compiler 



For programmers who want the 
speed of assembly language & the 
ease of BASIC. 48 commands & 
functions, most a subset of Ex- 
tended BASIC. Generates position 
independent code so a compiled 
program can reside anywhere in 
memory. When the compiler con- 
verts your BASIC program into 
machine language, it will run an 
average of 40 times faster! 

32K D $39.95 




Authorship 

Program 



Authors who want 
to turn software 
into cash & see their 
work on 6809 com- 
puters all over the 
world should apply 

for our attractive 

Authorship 

Programl 



Add shipping of $2 surface or $5 
air/Canada. Visa & MasterCard accepted. 
Dealer inquiries invited. Computerware® 
is a trademark of Computerware® . 

COMPUTERWARE' 

P.O. Box 668 

Encinitas/ CA 92024 

(619) 436-3512 
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Color Power II 

Expands Your CoCo to CP/M 
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88 POUER SUPPLY INCLUDED 



18 USES CoCo COMMANDS 
11 

12 RUNS THOUSANDS OF CP/N PROGRAMS 

13 

14 HO HARDIIARE MODIFICATIONS NEEDED 

15 

16 HO HEil OPERATING SYSTEM TO LEARN SUCH AS OS-9, SDOS, FLEX, OR CP/M 

17 

18 NO NEE! FOR A $138 EXPANSION INTERFACE 

19 

28 NO NEED FOR A $139 88 COLUMN BY 24 LINE BOARD 
21 

22 Mt THIS IS AN ACTUAL COLOR POUER II DISPLAY t t t 
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Plug Color Power II into the expansion port of your 64K 
CoCo, plug the disk controller into Color Power II, and insert 
our disk into the drive. Then run thousands of CP/M pro- 
grams such as Word Star, Mail Merge and Perfect Writer/ 
Speller/Filer/Calc. It’s that simple! 

You now have a fully professional CP/M compatible com- 
puter that generates an 80 column by 24 line display on your 
80 column monitor with upper and lower case characters and 
works with your CoCo commands. 



There’s no need for hardware modification or to learn a new 
operating system or to spend hundreds more for an expan- 
sion interface or an 80 column by 24 line board. 

Introductory Price of $299.00 

Call or send check, money order, Visa or MasterCard 
number with expiration date to the address below. 

N.J. residents add 6% sales tax. 



Color Power Unlimited, Inc. 

1260 Springfield Ave., New Providence, N.J. 07974 
P.O. Box 606 

( 201 ) 665-9646 



CP/M is a trademark of Digital Research, Inc. Word Star and Mail Merge are trademarks of MicroPro, Perfect Writer/Speller/Filer/Calc are trademarks of Perfect Software, Inc. 
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FEATURES 




12/Speller by Gerald Wegner 
Practice your spelling! 


(Education) 


14/Remote Override by Larry Landwehr 
Cut down on typing. 


(Hardware) 


18/Databasing by Terry Kepner 
A look at what it is, and what's available. 


(General) 


27/Cashbook by D. E. Wood 
A simple cashbook application. 


(Home Management) 


40/More Summer Project Winners 

Here's the Grand Prize winner in Basic — Spazmorg! 


(Game) 


54/CCTerm by Richard Campbell 

You have an inexpensive terminal at your fingertips. 


(Utility) 


62/Videotex by Steve Wegert 
A quick trick with scotch tape. 


(Hardware) 


65/Disk Secrets by William Barden, Jr. 
Part II of a disk primer. 


(Tutorial) 


72/Explaining Color Basic ROM by James A. Sanford 
Part 1 of a detailed explanation. 


(Tutorial) 


78/Modified Basic DBM by Charles Jefferson 
Upgrading Detwiler's original. 


(Upgrade) 


87/Color Computing For Kids by Jean Plesser 
If.. .Then. ..Else. 


(Education) 


94/Morse Code Generator by Stephen Ritger 
Dits and dahs on your TV. 


(Utility) 


95/Dissecting Your ROM by Jake Commander 
Part seven — The end of Standard Color Basic. 


(Utility) 


106/3-D Graphics! by Dale A. Keller 
Really, truly 3-D — with rotation! 


(Graphics) 


125/Custom Color by Dennis Kitsz 

Part 1 of The Color Burner. Part II will appear in May. 


(Utility) 


DEPARTMENTS 




4/PEEK 




10/INKEYS 


52/GOTO SCHOOL by Dr. Paul Kimmelman 


120/DEFUSR by Terry Kepner 


134/REVIEWS 

OS/9, Worksaver, Basic Aid, and more! 


156/NEW: PRODUCTS 


158/FOR...NEXT (04,84) 


160/END OF FILE 


Cover 

"Superman" by Charley Freiberg; body and visage by Mike Federle 


POSTMASTER: Please send address changes TCCM, P.O. Box 2596, Boulder, CO 80302. Second Class postage paid at Camden, 
Maine and additional mailing offices. 
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OS-9 or FLEX 



O-PAK: Hi-Res screen formats for RS OS-9, plus XCOPY 
utility to copy files from OS-9 to FLEX to RS DOS and vice 



versa! 

For OS-9 .xM $34.95 

A-BASIC: Produce fast compact, ROMabie object code 
from easy to write BASIC source code. 

For OS-9 and FLEX (includes CoCo versions) $75.00 



CRASMB: Use the MACRO cross assembler and any of the 
following CPU personality modules (CPM’s) to assemble 
that CPU’s source code into OS-9, FLEX, Motorola S1-S9 or 
Intel-HEX formatted Object code files. Available CPM’s: 
Motorola 6800-2-8, 6801-3, 6805, 6809, MOSTEK 6502, RCA 
1802, INTEL 8080-5, ZILOG Z-80. 

OS-9 or FLEX: 

CRASMB (Object only) $200.00 

CPM’s (Object only) $ 35.00 each 

CPM’s (with Source) $ 70.00 each 

DYNASOFT PASCAL: This remarkable Pascal subset is a 
p-code implementation that only requires 12K of RAM. 
CoCo FLEX or OS-9 $59.95 

DYNA-C: NEW! This “C” subset run circles around any 
others in its price class! 

OS-9 (with Source) . $109.95 

FLEX (with Source) $ 99.95 



language programs, and 6809 assembly code to position- 
independent code and data. 

OS-9 (Object only) $75.00 

FLEX (Object only) $50.00 

UnIFLEX (Object only) $75.00 

FHL COLOR FLEX: All the power of the FLEX operating 
system available for the 64K Color Computer. Standard 
features include: “TED” Tiny Editor, “ISM” Tiny Assem- 
bler, Hi-RES screens and MORE! $69.95 

FHL FLEX Color UTILITIES: This combination of TOOLKIT 
#2 and EXTENDED UTILITIES for FLEX includes: REPAIR, 
SCAN, REPLACE, INIT, USERINFO, LOAD, SAVETEXT, 
READTEXT, DISKDUMP, LNKMAT, SEGMAT, MAP, and 
DINFO. 

CoCo FLEX . . . (Object only) $50.00 

(with Source) $75.00 

ED/ASM: Full-feature line oriented Editor and conditional 

macro-assembler. 

CoCo OS-9 or FLEX $69.95 

DYNASPELL Spelling Checker: Use with Dynastar for a 
complete word processing system. Now with new LOOK- 
UP command! 

CoCo FLEX or OS-9 $59.95 

(Requires O-PAK for CoCo OS-9 version) 



DO: Job Control Language for OS-9 

This easy to use, “BASIC-like” Job Control Language is 

great for Batch processing. 

coco os-9: MaaHp . $49.00 

Standard OS-9: $99.00 

DYNAMITE + : Easy to use disassembler complete with 
cross reference generator, and label files maintained in 
text form only. Available for Color Computer. 

OS-9 (Object only) $150.00 

FLEX (Object only) JK $100.00 

6800 - 6809 and 6809 PIC/PI D TRANSLATORS: Convert 
6800/1 assembly language programs to 6809 assembly 



DYNACALC: The powerful electronic spreadsheet for 6809 
computers! 

CoCo FLEX $200.00 

STYLOGRAPH: A complete word processing system which 
offers total formatting control. 

CoCo OS-9 or FLEX $149.95 

SUPER SLEUTH: Examine and modify or disassemble 
binary program files into source code format. Object code 
for 6800, 01, 02, 03, 05, 08, 09, or 6502 may be processed. 
Object only: With Source: 

CoCo OS-9 $49.95 OS-9 $99.00 

CoCo FLEX $50.00 FLEX $99.00 



This is just a sampling of the programs we have available for OS-9 and FLEX. For more 
information, give us a call or send for our FREE catalog!! 




THE REGENCY TOWER • SUITE 215 • 770 JAMES ST. • SYRACUSE, NY 13203 
PHONE (3 15)474-7856 • TELEX 646740 
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ommunications are a part of everyone's life. You 
can't function in our society without communi- 
cating in some fashion with untold numbers of 
people. Communication does not have to be ver- 
bal — it can be a gesture that two people under- 
stand, it can be written characters of an alphabet, it can be 
a numerical equation, or a physical or drawn sumbol with 
meaning — the only real limitation is that whatever passes 
for communication must somehow originate from one 
source, be received by another, and must have the same 
meaning for both. Otherwise, communication does not 
exist, or fails. 

How one communicates depends on many factors — to 
whom you wish your message to go, how many other folks 
you want to receive your message, how far from those folks 
you are, whether they speak the same language, whether 
you or they are physically handicapped, how fast you want 
your message to be received, whether you want acknowl- 
edgement of reception, and so forth. Communication also 
can be one way or two ways — a message sent and received, 
ora message sent, received, and generating a response. 

Computer technology has opened up a whole new meth- 
od of communications for those of us lucky enough to be in 
the field. Communications via microcomputer — and usually 
modem and telephone line — is now one of the fastest, most 
reliable, and accurate ways to transmit a message (data). It 
cuts through the barriers of time, distance, physical abilities, 
and language barriers with ease. It opens one to receive from 
or send messages to any number of people at one time, in 
one step — sometimes even in our absence. To folks living 
a century ago, communications via computer would seem 
very close to a miracle. 

This issue begins the first of three issues in which we will 
look at computer communications. This month our theme 
articles will deal mainly with those communications that take 
place over the telephone lines. Next month we'll look at 
robotics — how man communicates with a machine through 
his other machine: the microcomputer; in May, we'll look at 
computer languages — how we communicate with our micro. 

First GOTO 1 8 to learn what databasing is, and to discover 
what databases are available to micro users. Terry Kepner 



gives us a good overview, and sources to discover even more. 

GOTO 54 to learn how to turn your Color Computer into an 
inexpensive terminal. Then GOTO 62 to discover how a piece 
of scotch tape can make your videotex program do things it 
can't do! 

Part II of Bill Barden's primer on disks — what they are, 
how they work — can be found if you GOTO 65. From there, 
GOTO 125 for part one of Dennis Kitsz's EPROM burner: 
Color Burner. Dennis has some April foolishness planned for 
next month, so part two will not appear until May. At that 
time, Clement's alternate EPROM burner method, originally 
promised for this month, will also appear. 

The end of Jake's disassembly of Color Basic has finally ar- 
rived (GOTO 95); he will begin disassembling Extended Color 
next month. To help you folks who didn't find Jake's expla- 
nations long or detailed enough for your purposes, GOTO 72 
for part one of James Sanford's longer explanation of Color 
Basic ROM. 

Now let's take a break from the hard stuff and GOTO 40 
for some fun: "Spazmorg," byA.E. Bogdan, was the Grand 
Prize Winner in the Basic category of the Summer Program- 
ming Project. It's a great game. 

GOTO 1 2 for a simple program that will help your students 
practice spelling; GOTO 87 for this month's installment of 
Color Computing For Kids, that includes a special St. Patrick's 
Day game; and GOTO 52 for the latest news from the educa- 
tional scene, with Dr. Paul Kimmelman. 

Remember Detwiler's Basic DBM article (March, 1983)? 
GOTO 78 for a modified version with additions. 

Having trouble keeping your accounts straight? GOTO 27 
for a solution. Tired of typing all those commands? GOTO 14 
for a quick end to one lengthy command series. 

Now let's have some real fun. We've all wondered why our 
nifty little machine couldn't do some of those wonderful 
graphics its bigger brothers seem to do so easily. Well — we 
were all wrong. Our nifty little machine can draw a three- 
dimensional object and rotate it on its axis. Granted, it has to 
think about it a little longer than its bigger siblings might, but 
— well, GOTO 106 and see for yourself. I promise you, the 
relatively short wait is well worth the results! 

— DM., Editor 
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Systems, Inc. 

Colour Software Workbench 



TM 



The Colour Software Workbench (CSW) is a system of machine language programs that run on a 32K or 64K TRS-80 Color Computer Extended 
Disk Basic System. It lets you develop machine language programs in a combination of Pascal and 6809 Assembler source languages. The 240 + 
page CSW User's Guide that is included explains the fundamentals of the languages as well as how to use the package. 



Part ONE of the 
CSW User's Guide 
tells you how to use 
all of the programs 
in the Workbench. 
This first part 
contains one section 
for each program. 




TEXT EDITOR 

• Screen Mode Editing 

• Entering Text 

• Finding Strings 

• Changing Multiple String Occurrences 

• Moving, Copying and Deleting Blocks of Text 

• Reading, Writing and Merging Files From Tape and Disk 

PASCAL COMPILER 

• Specifying: 

o Source from Tape, Disk or Keyboard 
o Object and Listing to Tape, Disk, Screen or Printer 

• Optional Symbol Table in the Object File for use by the Symbolic 
Debugger 

• Explanation of Source Listing Format 

MACRO ASSEMBLER 

• Specifying: 

o Source from Tape or Disk 

o Object and Listing to Tape, Disk, Screen or Printer 

• Explanation of Source Listing Format 

OBJECT LINKER 

• Specifying: 

o The Machine Language ORIGIN 
o Listing to Tape, Disk, Screen or Printer 
o Binary File on Disk 
o Whether to use Pascal Runtime Library 
o Whether to use Symbolic Debugger 

SYMBOLIC DEBUGGER 

• Setting and Clearing Breakpoints 

• Displaying and Modifying 6809 and Graphics Registers 

• Displaying and Modifying Memory 

• Using Pascal Symbols 

• Tracing Pascal Procedure Activations 

• Viewing the User's (Graphic) Screen 

• Using Symbols, Registers & Constants in Expressions 

$ 150.00 

3% Shipping & Handling, 5% Maryland Sales Tax 
To order, send Name and Address and check or money order to: 

DEFT Systems, Inc. 

P.O. BOX 359 

DAMASCUS, MARYLAND 20872 
or CALL TOLL FREE: 1-800-368-3238 Operator 8 
(in Virginia) 1-800-542-2224 Operator 8 

Shipped UPS as soon as your check clears, sooner if you charge, 
MasterCard and VISA accepted. 

"TRS-80" and "Color Computer" are Trademarks of TANDY Corporation 





Part TWO of the CSW User's Guide provides you with the 
background information needed to write programs using the Colour 
Software Workbench. 

LEARNING EXERCISE 

• Complete Pascal and Assembler Language Source 

• Uses All Parts Of the Workbench 

• Resulting Program is a Text Processor 

PASCAL 

• Describes Standard I anguage Flements Supported 

• Constants Include Decimal and Hexadecimal Integers, ASCII 
characters and strings 

• Types Include: 

o Integer, Char, Boolean, Enumerated, Subrange 
o Multi-Dimensioned Arrays 
o Records and Variant Records 
o Sets of Up to 256 Elements 
o Files 

• PROCEDURES and FUNCTIONS with FORWARD 

• Variables and LABELS 

• Arithmetic, Boolean, and Set Expressions 

• Statements: IF, WHILE, REPEAT, CASE, GOTO, EXIT, FOR, 

BEGIN, assignment (: = ) 

• Input/Output: RESET, REWRITE, READLN, EOF, WRITE, 

WRITELN, CLOSE, PAGE 

• Built-in Functions and Procedures: ABS, CHR, CURSOR, ODD, 

ORD, PRED, SUCC 

ADVANCED PASCAL 

• Strings Support: Assignment, Comparing, Concatenation 

• String Procedures and Functions: STRINGCOPY, STRINGDELETE, 
STRINGINSERT, STRINGPOS, HEX, ENCODE, DECODE 

• Type Extensions for Structured Type Breaking 

• Absolute Memory Access via Built-in WORD and BYTE Arrays 

• ROM Routine Access via CALL Built-in Function 

• Static and Public Variable Allocation 

• Separate Compilation and Assembler Interface via INTERFACE, 
EXTERNAL, and PUBLIC 

• Listing and Multiple Source File Directives 

• Explanation of Error Messages 

6809 MACRO ASSEMBLER 

• Motorola Compatible Source Conventions 

• Macro Facility With up to 9 Macro Parameters 

• Separate Compilation and Pascal Interface via PUBLIC and EXT 
Directives 

• Listing Control Directives 

• Explanation of Error Messages 

TECHNICAL NOTES 

• CoCo ROM Compatibility 

• Pascal Runtime Library Assembler Interface 

• CSW Object File Format 




Hi-resolution and 3-di- 
mensional skeletal 
graphics packages in- 
cluded. This includes full 
Pascal & Assembler 
source code. Includes: 
HIRESCLEAR, 
HIRESLINE, 
GRAPHDISPLAY, 
MOVESKELETON, 
SHOWSKELETON 



DEFT and "Colour Software Workbench" are Trademarks of DEFT Systems, Inc. 
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Home Accountant 

Balances checkbook, reconciles bank statement, and updates 
budgetary categories in minutes. 

Easy check entry and check modification. 

Enter cleared check numbers from bank statement and the system 
is updated from that list. 

80 standard budget categories and 20 multiple categories are easily 
set up and updated at your command. 

Summary sheets are printed for checkbook entries, bank statements, 
individual categories and category recap. 

For use on 32K Extended BASIC system with 1 or 2 disk drives. 
Printer recommended. 

HOME ACCOUNTANT software (disk) & manual $65.00 
Manual Only $7.00 (refundable with purchase) 



Add $2.00 for shipping. 

CO residents add 5.75% tax. 
Check or M.O. — Allow 2 wks. 
for personal checks. 



HS & Co. 

1 1 1 E. Drake, Suite 7001 
Ft. Collins, CO 80525 
303-493-2359 




NOW YOUR RADIO SHACK PUTS LINE-BY-LINE CONTROL 
OF TAX PREPARATION AT YOUR FINGER TIPS. 





Calculations are automatic. All you do is 
enter your tax information. Tax Command 
does all mathematical calculations for you. 
Built-in tax tables eliminate guesswork. No 
more finding the right column down and 
right line across. Tax Command has the 
1040 tax tables built right in. So ~ ' 
it zeros in on your refund (or tax 
payment) amount automatically. 

Tax Command is fast, easy! Just 



a me inuit 

4P 



fill in the blanks. If you make a mistake, no 
problem. Just go back and retype your 
entries. Everything is re-calculated for you. 
You'll find the 1040. Schedule A. Capitol 
Gains & Losses. Income Averaging. And 
more. Anyone who can read can use Tax 
Command. And the best feature 
of all . . . just $24.95 plus $2.00 
for shipping and handling. 
Wisconsin residents add 5% tax. 



Practical Programs, Inc. 

P.0. Box 931 04- W • Milwaukee, Wl 53203 • (414) 278-0829 
Available at fine computer stores everywhere, or by ordering direct. 
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V. 



Give up on Word Processors for 
Fosf letter Writing 6 Moiling Lobels 



Instead use the 



DATABASE/MAILER 2. 

& 

LETTER WRITER 2.0 



for FAST single page letters or 
1 000’s of form letters and labels 

SEE REVIEW DECEMBER ISSUE 
OF “RAINBOW” MAGAZINE 




NO WORD PROCESSING EXPERIENCE NECESSARY 



— CC-DBM2/LW2 USES — 



• Accounts 

• Insurance 

• Proposals 

• Bulk Mail 



• Dental Recall 

• Lost Card Reporting 

• Change of Address 

• Christmas Lists/Labels 



• Churches 

• Club Membership 

• Realtor Listings 

• Sales Records 



- BIG SYSTEM FEATURES — 



• Active menus guide you to valid operations. 

• 32 K system allows 68 to 454 records per file. 

• 1 6K system allows 1 3 to 95 records per file. 

• 4 - 10 fields, 5 - 27 field widths, 20 - 270 char/record. 

• All user definable with default values * simple. 

• Memory sense adjusts files to system size. 

• FAST key index sort by any field you choose. 

• Adjusts for empty address lines - no gaps. 



• Up to 9 line labels with up to 500 copies each. • Fast single page letter writing with wordwrap. 

• Master two column printout with field names. • Embedded commands center, tab and line skip. 

• Master printout includes date, paging & filename. • Full screen edit allows delete, insert & change. 

• Selective printing by any field or field range. • Headings and closings are tabbed, spaced and printed - all automatically. 

• Accepts alpha or numeric zip codes up to 9 digits. • No "Database Adventure" - over 40 page manual. 

• Partial or whole item search by any chosen field. • Manual includes program operation flowcharts. 

• Single screen 1 0 record display by any field. • Not needed, but included is user modification sectioa 

• Single key entry for hard copy of screen data. • And many more features - too numerous to list. 



We ship within 24 hours 



\ 



When ordering please provide: 
NAME 
ADDRESS 
CITY/STATE 
ZIP CODE 
PHONE 
TAPE or DISK 
CREDIT CARD NO. 

EXP. DATE 

Master Card holders — 
include interbank no. 



Call our 24 hour orderline 

619-695-1385 



or 61 9-566*601 3, 9 — 5 p.m. PST weekdays 
or send check or money order to: 

ELIS ENGINEERING 

9528 Suite 35, Miramar Road 



Please include the following: 
$2 postage and handling 
U.S. funds only 
CA residents add 6% tax 
COD orders add $2 

Dealer inquiries invited 

Personal checks - OK 
we won't make you wait. 



— 


San Diego, CA 921 26 






" Serving the Defense and Space Industry since 1979 ” 





r 
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The affordable step up in home computing. 




Expand Your Programming Power! Our new 64K Ex- 
tended BASIC Color Computer 2 gives superb features 
to serious programmers — at a very low price. It attaches 
easily to any television, and has an electric typewriter- 
quality keyboard in a compact, white case. Using the 
built-in Extended BASIC language, you can write sophis- 
ticated programs and easily create high-resolution 
graphics. Produce drawings, charts, diagrams and ani- 
mation with simple, one-line commands. “Draw” with 
eight different colors, create musical tones, analyze data 
and much more. Or select from our large library of in- 
stant-loading Program Pak' M cartridges for games, edu- 
cation and budgeting. 

Deluxe Joystick 

39? 5 

26-3012 



Prices apply at participating Radio 
Shack stores and dealers. OS-9 is a 
trademark of Microware and Motorola, 

Inc. 
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AS LOW AS 
s 26 PER 
MONTH 



64K Extended BASIC 
Color Computer 2 



Radio Shack’s Best 

Is Now 





TRS-80 Color Computer 
Even Better. 



The Heart of a Professional Disk-Based System. Add 

a Color Computer disk drive for an extra 156,000 charac- 
ters of storage and quicker access to your data. You can 
add up to four disk drives for a vast 626,000 characters 
of total storage. For advanced programmers, our new 
OS-9 operating system (26-3030, $69.95) allows you to 
utilize the full 64,000-character memory for assembly 
language programs. OS-9 includes a text editor, assem- 
bler and debugger. You can develop and edit your own 
assembly language programs, convert them into ma- 
chine language for execution, then test them for errors. 



Multi-Pak Interface 




USE YOUR 



Easily Expandable. Best of all, your 64K Color Com- 
puter 2 will grow with your future needs. Add our Deluxe 
Joysticks for more accurate cursor control and faster 
response with your favorite games. Or choose our 
Multi-Pak Interface, which lets you connect up to four 
Program Paks to your Color Computer at once. When 
you’re ready to change programs, just move the selector 
switch. Go on-line with the world with our deluxe RS-232 
Program Pak (26-2226, $79.95). You can communicate 
with national information services and local bulletin 
boards by telephone — just add a modem. You can also 
add a printer, a Color Mouse cursor controller and more! 

See It Today. The 64K Extended BASIC Color Com- 
puter 2 is available today at over 1000 Radio Shack 
Computer Centers and at participating Radio Shack 
stores and dealers nationwide. 





Disk Drive #0 Kit 




26-3029 

AS LOW AS 

■ s^ s 28 PER 

MONTH 



Send me the all-new 1984 TRS-80 catalog RSC-11. 



Mail To: Radio Shack, Dept. 84-A-616 
300 One Tandy Center, Fort Worth, Texas 76102 



NAME 

COMPANY _ 
ADDRESS _ 
CITY 



| i CLcrnuivc , j 

Radio /hack 



The biggest name in little computers® 

A DIVISION OF TANDY CORPORATION 




—INKEY$ 




Mew Fit for Slither 

I am glad to see more as- 
sembly language programming 
showing up in your magazine. 
Stephen P. Allen's "Slither" was 
a lot of fun. It fits very well into 
my 16K Color Basic machine 
by changing only the ORG to 
$3300 and the SETDP to $33. 
Just insert the EDTASM+, type 
in the program with the two 
changes, and assemble A/IM/ 
AO. To run the program, enter 
GSTART from ZBUG. To save it, 
type P SLITHER 3300 38AC 331 A. 

From then on it can be 
CLOADed and executed from 
Basic. 

Richard Martin 
Raleigh, N.C. 



Fix and Change 

In your November issue you 
printed a program called 
"Slither." The heading said the 
program was for Extended 
Basic. However, by changing a 
few lines it will Vun on Non-Ex- 
tended Basic. Also, the program 
had an error. 

These are the lines for Non- 
Extended Basic: 

Omit 4050 

1040 Print @LL, "Score = " SC 
"Crashes Left = " CT-CS; 

41 10 Print @LL, "Score = "SC 
"Crashes Left =" CT-CS; 

5010 CIs: Print @ 167, "Your score 
was " SC; 

5020 Print @231, "High Score is " 
HS; 

To fix the error type: 499 GOTO 
4000. 

It is my theory that a few lines 
could be inserted at the begin- 
ning of a program so that Ex- 
tended Basic commands could 



be used on Non-Extended Basic. 
For example: 

Draw = POKE n,x 
Line = POKE n,x etc. 

Also I agree with one of the 
letters in your column. I also 
would like assembly language 
for the beginner. I am 1 4 years 
old. 

Lee Helton 
Brashear, MO 



News Needed 

Paging through the last issue 
of The Color Computer Mag- 
azine I see a high quality publi- 
cation that certainly knows 
where it stands. I feel you have 
done a great job in forming the 
magazine and in creating your 
own style. Now I am starting 
my own free newsletter. As the 
newsleter's editor, I am asking 
for submissions from The Color 
Computer Magazine readers. 
All submissions will be printed. 

Matthew Kurzawa 
Parlin, NJ 



Simplification 

I am impressed with the series 
called "Graphics? Yes!" in the 
last two issues of The Color 
Computer Magazine. I feel 
one important item should be 
added. There is an un- 
documented command avail- 
able from Draw mode that can 
make it easier to use. Remem- 
ber the X; command? The var- 
iable between the X and the 
semicolon is used as if it were 
a part of the Draw string. 

If you want to do the same 
thing with numeric variables 
use the =; command. The var- 
iable between the equals sign 
and the semicolon is used just 
as if it were part of the Draw 
string. Using this command 
means you don't have to con- 
vert numbers with the STR$ 
command to add them to the 
Draw string. 

Here is an example: 

10 PMODE1,1 
20 PCLS0 
30 SCREEN1,0 
40 FOR N=0 TO 3 
50 DRAW"BM1 28,96;A=N; 

C=N;U88;" 

60 NEXT 
70 GOTO 20 

This will draw a four color 
cross on a red background. You 
cannot see the top line of the 
cross because it is the same 
color as the background. In the 
example, the variable N indi- 
cates both the line color and 
the direction it is drawn. 

The =; command can be used 
in the same way in the Play 
mode using the same syntax. It 



Bulletin Boards 



California 

Falcon Color-80, is on-line 24 hours a day in California 
with an electronic mail section and full upload and down- 
load capabilities. Write Craig, Keith and Dan Daniel, 
Sysops, Falcon Color-80, P.O. Box 2936, Fairfield, CA 
94533, for more information, or call (707)437-3663. 

Chicago BBS 

Creme De Coco is a 24 hour, seven-day a week bulletin 
board; phone(31 2)597-8485. 



eliminates many lines of un- 
necessary code converting 
numbers to strings. 

Rex Rivers 
Via CompuServe 



Joystick Adaptation 

I loved "Slither" (November, 
1983) so I programmed the 
game so you can play with the 
joystick. Note: This is not the 
machine language version. 

Add these lines: 

501 UP=JOYSTK(0) 

502 LT=JOYSTK(1) 

510 IF UP<2 THEN DY= — 1 :C = 1 
520 IF UP>1 THEN DY=1:C = 1 
530 IF LT<2 THEN DX= — 1 :C = 1 
540 IF LT>61 THEN DX=1 :C = 1 

Andy P. Oikle 
Westborough, MA 



Basking in Info 

I remember the dark days 
when the Color Computer 
came out and there was hardly 
any source of information 
about it. I spent many hours 
(which I enjoyed), wondering 
what made it tick, trying to get 
the info out of a sometimes 
unyielding Getting Started With 
COLOR BASIC from the Shack. 

But now I marvel at what's 
in your magazine, from Barden 
to Kitsz; even the ads are in- 
structive (not to mention the 
Map!). I recommend you to 
my friends, and am upgrading 
through one of your adver- 
tisers. 

Terrence R. Settemtue 



Southern 

Software Answers 

Thank you for your thought- 
ful review of the Bar Zapper in 
the December 1983 issue of 
The Color Computer Maga- 
zine. In all respects the review 
gives an accurate report of the 
capability of the Bar Zapper. 
However, the one "drawback" 
mentioned in the review is ac- 
tually a significant feature. The 
so-called drawback is the fact 
that a screen print program is 
not included. If a screen print 
program were included, it 
would likely be one compatible 
with Radio Shack printers. This 
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would eliminate all the Color 
Computer owners who have 
other kinds of printers. 

To solve this problem we 
recommend our customers ob- 
tain the necessary print pro- 
gram from Custom Software 
Engineering (807 Minutemen 
Causeway, Cocoa Beach, FL 
32931). Custom Software En- 
gineering has a screen print pro- 
gram for many printers includ- 
ing Radio Shack. Finally, we pro- 



vide detailed instructions on 
how to interface the screen 
print program so that a single 
keystroke gives an automatic 
print-out of the displayed 
graph. 

So, what at first glance ap- 
pears to be a limitation is part 
of how we are able to satisfy 
all those folks who don't have 
"pure" Radio Shack systems. 

Thomas J. Ernst 
Merritt Island, FL 



Star Fix 

As "Star," by David Lauta, appears in the November 
issue, a syntax error occurs in Line 30. If you delete the 
two asterisks in Line 30, "Star" will work correctly. 

David M. Lauta 



Clubs 

Kirksville, MO 

For information send a self addressed stamped en- 
velope to Mike Galletiy, 703 College Park Dr., Kirksville, 
MO 63501. 

Ontario Club 

Meadovwale Color Computer Club meets on the first 
Thursday of each month at 6:30 p.m. For more informa- 
tion write the club, P.O. Box 186, Streetsville, Ontario 
L5M2B8. 

Huntsville, AL 

The COLOR80 Users Group has been organized in 
Huntsville, Alabama. For more information call (205)882- 
2485 or write Randy Niemann at 10111 Versailles Dr., 
Huntsville, AL 35803. 

Toledo, OH 

The Greater Toledo Color Computer Club meets the 
first Thursday of each month at 7:30 p.m. in the Wernert 
Civic Building, on Douglas North of Laskey, in Toledo, 
Ohio. For information call 478-6961 or 537-1432. 

Peoria Club 

The Peoria Color Computer Club meets on the second 
and fourth Saturdays of each month at 10:00 a.m. at the 
Germantown Hills Fire Station in Germantown Hills, Il- 
linois. For further information contact Harold E. Brazee at 
1 02 Twin Oaks Ct., East Peoria, IL 61 61 1 or call (309)694- 
4703. 

Montreal Users Group 

Montreal TRS-80 Users Group may be contacted at 
1 1 76 Phillips Place, Suite 201 , Montreal, Quebec, Canada 
H3B 3C8. Member benefits include down-time service 
which entails use of another member's equipment as long 
as his/hers is indisposed; purchases through the club 
charged at a discount; Bulletin Board System, which in- 
cludes a classified ad department and electronic mail; ad- 
vertising accepted at a nominal rate; and free subscription 
to a bi-monthly newsletter. 



HARDWARE SPECIALS 



26-3026 Color Computer 2 16k $149.95 

26-3026E Extended CoCo 2 16k $219.95 

26-3026E64 64k Extended CoCo $299.95 

26-1261 TP-10 Thermal Ptr $89.95 

26-1192 CGP-1 15 Printer $174.95 

C Itoh 8510 Prowriter Printer $399.95 

26-1268 CGP-220 Color Ptr $599.95 

RS D.C. Modem 1 $89.95 

RS D.C. Modem 2 $179.95 

Hayes SM300 Smartmodem $239.95 

USR 300/1200 Password $449.95 

26-3024 Multipac Interface $149.95 



ACCESSORIES 



R/S Upgrades $$Call 

26-3030 OS9 $64.95 

26-3036 BASIC 09 $87.95 

64k Memory Upgrade Kit $59.95 

26-3029 CoCo 2 Drive 0 $349.95 

26-3023 Drive 1, 2, 3 $239.95 

Video Plus $24.95 

Gorilla BW Monitor, Green or Amber . . . $99.95 

Amdek Color I Monitor $325.95 

Amdek Disk Drive $499.95 

26-3012 Deluxe Joystick $35.95 

Wico Analogue Joystick $49.95 

Wico Adapter for Atari type Joystick .... $19.95 

Super Pro Keyboard Kit $64.95 

HJL-57 Keyboard $79.95 

MSI Color Finance II (disk only) $69.95 

MSI Disk Utility $19.95 

Verbatim Disks — Box of 10 $27.95 

Elephant Memory Disks — Box of 10 ... . $22.95 

TOLL FREE TENNESSEE 



1 - 800 - 251-5008 1 - 800 - 545-2502 





DELKER ELECTRONICS, INC. 
408 C NISSAN BLVD. 

P.O.BOX 897, DEPT. C 
SMYRNA, TN 371 67 

Prices do not include shipping. 
All items subjectto availability. 

All of the above units covered by 
out 120 day carry in warranty. 
Write for free newsletter. TRS-80 
Trademark Tandy Corporation. 
Prices subject to change without 
notice. 



S Enter9onTeleResponsepage 159 



Color Computer/11 







to»*fixh- ‘$3 







4K Color Basic 



L ast winter my young daughter 

wanted to get into the spelling bee 
at school. I had just 4K of memory 
and a cassette recorder for I/O, but I de- 
cided this should be enough. In fact, I 
made it a condition for buying more 
equipment: if this application didn't 
work on my small machine, I was not 
going to buy anything else; but if it 
worked out well, I would purchase more. 

I now have several small computers, and 
my largest Color Computer has 4K. 

The program is necessarily a bit crude, 
but considering there is no extra hard- 
ware and that it takes less than 4K of 
memory, one is hard pressed to do much 
better. 

There are two modes of program op- 
eration: the Input mode, and the Test 
mode. After loading the program and 
entering run, the program queries, what 
is your name?. If you push the Enter key 
the program goes into Input mode; any 
other entry puts it into Test mode. 

With the program in Input mode, put 
a freshly erased tape into the cassette re- 
corder and place it in record mode. The 
program will prompt enter word. At this 
time, key in the word you want spelled — 



by Gerald Wegner 



just make sure you spell it correctly! Next 
the program will prompt when ready to 
talk press the space bar. This is the tricky 
part: pull the computer's plug out of the 
MIC jack (and insert a microphone if the 
tape deck doesn't have one built-in), press 
the space bar, and say "Spell the word 
x, " where x is the word you want spelled 
(the same word(s) you entered above ! ). 

After you have pressed the space bar, 
the numbers from 1 to 333 will be dis- 
played on the CRT. Be sure to leave 
enough silent time between words so 
the user will have time to type or spell the 
words you've recorded. After you have 
recorded the word to be spelled, put the 
plug back into the recorder. When the 
program prompts you to continue, press 
the space bar. The program will now 
prompt you to type in a word. This se- 
quence will be repeated until you press 
the Break key. I have loaded several tapes 
with a hundred and one words using this 



program, and had no trouble after I got 
used to the procedure. 

Initially try a few easy words in the 
Input mode, then return to the Test 
mode, rewind the tape and act as the 
user. This lets you check for a bad tape 
and redo it easily. 

If anything other than the Enter key is 
entered at the initial query, the program 
assumes the entry is your name, and will 
use this name several times as you cycle 
through the program in Test mode. In 
Test mode, the tape with the words pre- 
viously entered (via the Input mode) will 
be played through the TV speaker. The 
program will count from 1 to 330 on the 
TV screen during the time "Spell the 
word x" is spoken over the TV speaker. 
The program then prompts the user: 

SPELL IT. 

The program will check the spelling 
against the words you typed in. If it is not 
correct, the program will tell the user the 
spelling is incorrect, and prompt him to 
try again. It will repeat this five times, 
then it will spell the word correctly on the 
screen. 

If the word is spelled correctly, the pro- 
gram will prompt: good and then con- 
tinue to the next word. ■ ■ ■ 
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Program Listing: Speller 



1 REM SPELLER PROGRAM 
10 CLS(O) 

20 MOTOR OFF 
30 TT=5 

40 INPUT"WHAT IS YOUR NAME" ; N$ 
50 IF N$ <> "ENTER" GOTO 150 
60 INPUT" ENTER WORD";W$ 

70 MOTOR ON 
80 SOUND 130,1 
90 OPEN"0" ,-l , "WORD" 

100 PRINT# -1 , W$ 

110 CLOSE-1 

120 SOUND 230,1 

130 GOSUB400 

140 GOTO 60 

150 OPEN" I " , -1 , "WORD " 

160 INPUT#-1,W$ 

170 CLOSE-1 
180 AUDIO ON: MOTOR ON 
190 FOR XX=lTO330 
200 PRINT XX 
210 NEXTXX 

220 MOTOR OFF : AUDIO OFF 
230 T=0 

240 CLS ( RND ( 8 ) ) 

250 PRINT"SPELL IT" 

260 AUDIO OFF 
270 INPUTX$ 



280 IF X$=W$ THEN GOTO 370 

290 SOUND 50,1: SOUND 1,2 

300 T=T+1 : IF T>TT THEN GOTO 330 

310 PRINT"NO, " ; N$ : PR I NT "TRY AGA 

IN" 

320 GOTO 250 

330 PRINT N$ ; " , THE WORD IS" 

340 PRINT "SPELLED " W$ 

350 INPUT"PRESS THE SPACE BAR TO 
CONTINUE" ;S$ 



360 


GOTO 150 




370 


PRINT"VERY 


GOOD "N$ 


380 


FOR X=1 TO 


3 : SOUND 100,1: SOU 


ND 


100+10*X,1:NEXT X 


390 


GOTO150 




400 


REM 




410 


PRINT "WHEN 


READY TO TALK " ; 


420 


GOSUB 490 




430 


MOTOR ON 




440 


F0RXX=1T0333 


450 


PRINTXX 




460 


NEXT 




470 


MOTOR OFF 




480 


RETURN 




490 


PRINT"PRESS 


THE SPACE BAR" 


500 


A$=INKEY$ 




510 


IF A$<> " " 


GOTO500 


520 


RETURN 


■ ■ ■ 



FILMA8TR 

The Color Computer has a powerful ally in FILMASTR. This is a DATA 
MANAGEMENT SYSTEM that you can trust. FILMASTR combines 
the best features of the big systems to provide a combination of 
speed, power, and ease of operation that can’t be beat. 

YOU are in complete control of this friendly program with no program- 
ming knowledge required. You design the data screen with up to 20 
fields by moving the cursor on screen with the arrow keys and typing 
in the field names. FILMASTR takes care of all of the rest. 

Enter data by just filling in the blanks. This form fill-in is easy and 
natural to use. You can even copy data from the previous record with 
one key-stroke. Add records, delete records, change records without 
fuss. 

Tell FILMASTR to sort your file on any field that you want or to re- 
trieve a particular record and the job is done with super-human 
machine language speed. FILMASTR will find a single record or a group 
of records that meet your request and will save those records as a 
separate file if you want to. 

Controlled printing formats? Of course! Tell FILMASTR which records 
to use, which fields to print and in what order. You can control the 
print location to any position on the page. Mailing labels? You bet! 
All commands are given to FILMASTR with single key strokes. Press 
the HELP key (BREAK), and the available commands are displayed. 
Make your choice from the menu and let FILMASTR do the work. 
FILMASTR can store up to 255 characters in each record and up to 
24,000 characters in each file. (9000 with 1 6K). 

FILMASTR 16K or 32K TAPE $29.95 

EXT BASIC DISK $34.95 

AMDISK $39.95 



AOa 








COMPUTER 



Add $2.00 Postage & Handling • C.O.D. $2.00 Additional 
PA Residents Add 6°/o Tax 



Box 1051 • DuBois, PA • 15801 
Phone (814) 371-4658 
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H ERE IS a NEAT modification you 
can make to your cassette re- 
corder that will make it a lot 
easier to use. I changed mine about two 
weeks ago and wouldn't be without it 
now. This mod will let you rewind tapes 
without pulling the plug from the motor 
remote control jack or typing the Basic 
commands motor on or motor off. It will 
let you erase tapes while programming. 
You will be able to play tapes and listen 
for the file leader sound (to locate files on 
a tape) more quickly, without typing mo- 
toron and audio on. All this will cost $3. 

The jacks (earphone, microphone and 
motor) in your recorder are switches. 
Normally they appear as in Figure 1 . In- 
serting a plug changes them to Figure 2. 
The difference: a switch has been 
opened. 



-AMPLIFIER 

-SPEAKER 



”^7 CHASSIS 



Figure 7. Norma! Jacks 




/?7 

Figure 2. Jacks with Plug 



by Larry Landwehr 



If you were to take a piece of wire and 
connect it, as in Figure 3, on the remote 
motor jack in your cassette, the cassette 
will act as if no plug were present — this 
overrides the jack's switching action. If 
that piece of wire was a switch instead, 
as in Figure 4, you could selectively over- 
ride the plug. Just a snap of the switch 
and you can rewind, play, or erase. 

Making a similar change to the ear- 
phone jack will let the speaker operate 
while playing tapes. This gives you a 
quick way to position your tapes. 

Another possibility is to modify the 





microphone jack. You could then put a 
voice message (e.g., the file name) be- 
fore each file. This would permit super 
fast location of files on a multi-file tape. 

My present configuration is to have 
the earphone and motor override 
switches ganged together. Both are 
overridden simultaneously (the other 
possibility, each independent of the 
other, seems to have no useful purpose). 
This is accomplished by using a double- 
pole, double-throw switch. These are 
available from Radio Shack or any elec- 
tronics shop for about $3. They come in 
a variety of shapes and sizes; the most 
useful are the miniature toggles rated at 
three amps. 

Open your recorder and find the jacks. 
Wire the switch as in Figure 5. Hint: use 
a piece of wire to check your connections 
before soldering — it can simulate your 
switch. ■ ■ ■ 
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3420 S. 90th 
Tacoma, WA 98409 



DEALER INQUIRIES INVITED 



s Enter 1 1 on TeleResponse page 1 59 






For Orders Only 

1 - 800 - 426-1830 

except WA, AK, HI 



. !r, 'BWn 0 NO C 



’FROGGIE" (FROGGER) 

Race against the timer to get your 
“Froggie” home. Get across the busy 
highway and then the river using 
logs, turtles and crocodiles to get 
you there. Escort the lady frog or 
gobble up the fly for extra points; 
but look out for the otter; he's out to 
get ya! 

REQUIRES 32K RAM, JOYSTICKS 
OPTIONAL 

Cassette $24.95 Diskette $28.95 



Call or write for a complete catalog 
Business Office and Information Call: 

(206) 581-6938 

Office open 8:30—4:30 P.S.T. 








COLOR CABLES PLUS! 




Tired of plugging and unplugging de- 
vices from the RS232 port of your Color 
Computer? Make your life easier. Buy our 
RS232 expansion cable and connect two 
devices at the same time. Just right for 
printers, modems, etc. Anything that 
plugs into the Color Computer will plug 
into this high quality cable. 

RS232 Cable $20.00 

RS232 Switcher 29.95* 

*3 position 

COLORCOM/E BONUS! 

Order COLORCOM/E and get the RS232 
cable for only $15.00. Save $5.00. 



WHEN WAS THE LAST 
TIME YOU HAD A TALK 
WITH YOUR COCO? 



COLORCOM/E 




THE SPECTRUM VOICE P/ 

A CoCo voice synthesizer, is a coi 
plete phoneme based voice syst€ 
that uses the famous VOTRAX SC 



SMART TERMINAL PACKAGE 



WE DIDN’T WAIT for the competition to catch up with us! We’ve added even 
MORE features to COLORCOM/E, our superb Smart Terminal program for 
the Color Computer. Compare before you buy. NOBODY offers you more! 



★ Complete Upload and Download Support ★ 



★ Online Cassette/Disk Reads and Writes ★ 

★ 110, 300, 600, or 1 200 Baud ★ 

★ Full or Half Duplex ★ 

★ Preenter Data Before Calling (Saves $$'s) ★ 

★ Offline and Online Scrolling ★ 

★ ROM Pack or Disk 



Automatic Capture of Files 

Send All 127 ASCII Characters From Keyboard 

Word Mode Eliminates Split Words 

7 or 8 Data Bits (Including Graphics Support) 

Efficient Data Storage S-t-r-e-t-c-h-e-s Memory 

100% Compatible with Rainbow Connection's 

BBS's! 



COLORCOM/E $49.95 



chip synthesizer in a cartridge st^ 
pak. It provides an unlimited vocc 
ulary with automatic or user supplii 
inflection, plus four programmab 
levels of pitch. With a single line 
code, THE VOICE PAK adds spee 
to any BASIC program in minut* 
The system comes complete w 
user instructions, software casse 
with 16K and 32K — DISK/TAPE v« 
sions, a text to speech scanner trar 
lator and a Word Manager that cc 
structs and edits custom user d 
tionaries. The unit is fully assemble 
tested and ready to plug in and to 
talk, talk. $69.95 



AND, our efficient storage and easy editing of received data makes print- 
ing to your printer offline a snap. Select any portion of the received data 
for printing. No need to print everything. 



— 

Joystick Plug $ 3.99 

64K RAM Button - New $4.99 

SPECTRUM'S GOT THE NEW ROMS! 

Disk ROM 1.1 - New DOS 

Command for OS/9 $39.95 

64K Chips (Spectrum Special) ... $49.95/set 

C-10 Tapes — Any quantity! 49 cents 

514 Diskettes — Any quantity! $ 1 .99 

CoCo Memory Map $ 12.00 

6883 (SAM) Chip with Heat Sink $29.95 

6809E - CPU Chip $29.95 

Basic ROM 1 .2 — Run Basic 

30% Faster $39.95 

CoCo First Aid Kit — Be Prepared! 

(2 6821s, 6809E& 6883) $69.95 

EPROM Programmer (27 1 6, 

2732, 2764, and 68764) $139.95 

Color Computer Tech Manual $7.95 

V 



VIDEO PLUS — Superb video interface $24.95 
1 6K/32K Upgrade Kit — Lowest price $25.95 



Epson Printer Interface $49.95 

Lowercase Board $59.95 

Extended Basic ROM $69.95 

Mini Modem with RS232 Cable $79.95 

"Gorilla" Hi-Res Green 

Screen Monitor $99.95 

Disk Interface — Spectrum Special. . . . $139.95 

Drive 0 System $349.95 

Gemini lOx w/CoCo Interface $349.95 



Telewriter 64 — Top CoCo word processor for 
two years! Three hi-res screens, true lowercase 
characters, right justification, full screen editor. 
Tape $49.95, Disk $59.95 

✓ 



COLOR COMPUTER 
EDITOR ASSEMBLER ANC 
DEBUGGER 

"CCEAD is a high qua! 
program and excelle 
value. CCEAD is a tool th 
no assembly language pi 
grammer can afford to t 
without.''— Rainbow R 
view, Feb., 1983.* . . . $6.‘ 



THE STRIPPER 

Deletes REMarks, pac 
lines, and removes blanl 
"How much Memory c< 
you save? About 25% av< 
age."— Rainbow Revie' 
Feb., 1983.* $7.< 



’Order both and 

save a buc 




from SPECTRUM Projects 




COLOR 

COMPUTER 

SECRETS 

REVEALED 



LIGHT PEN - Plugs right in to 
your joystick port and reads 
the colors off your screen. 
Includes four demo pro- 
grams and is completely 
compatible with Computer 
Island's Fun-Pak software. 
$19.95 



FOUR-PIN MALE TO FOUR-PIN FEMALE - 15 FEET. Move your 
printer or modem to another location — easier use. $ 14.95 




The must CoCo book for 
1984, Contains a myriad of 
peeks and pokes, ROM and 
RAM upgrades, machine 
language backups, printer 
potpourri and more! Make 
your computer do things it 
never did before. .. $14.95 




COCO COOLER — Internal cooling 
system. Prevent heat buildup inside 
your Color Computer. "CoCo Cooler 
keeps things cool."— Rainbow Re- 
view, Dec., 1982, Page 39. . . $49.95 
(For D and E Rev. boards) 



NEWI TAPE UTILITY by Thomas Oik 

A powerful program that permits the user 
to easily maintain backup, and catalog 
both tape and disk programs. 

1. TDR— Tape directory 

2. COP— Tape to tape copy 

3. PTD— List tape directory to printer 

4. DIR— Directory of disk 

5. PDR— Print disk directory 

6. DTT— Copy file from disk to tape 

7. TTD— Copy file from tape to disk 

8. BAC— * *Auto disk to tape backup* *! 
Cassette or Disk - $24.95 



64K DISK UTILITY PACKAGE 

1 . 40K — Tired of seeing 22823? 

2. ROMCRACK — Now replace your 
ROMPAC Software or Disk! 

3. Software Print Spooler — Tired of 
waiting for your printer? Output 
data to a RAM buffer and go 
back to programming! Now 
works with all printers 600 Baud 
or better. 

64 Disk Utility Package - $21.95 
40k Program on Cassette - $9.95 
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DISK INTERFACE/ROM PACK 
EXTENDER - 3 FEET. Move 
your disks and ROM packs 
where you want them. Gold 
plated contacts eliminate 
corrosion $29.95 



HIDDEN BASIC 1.0 

Finally! A program written to protect 
your BASIC programs. HIDDEN BASIC 
1 .0 will modify your BASIC programs so 
these commands will not function: 
CLOAD or CLOADM 
CSAVE or CSAVEM 
DEL or EDIT 
LIST or LUST 

The protected copy is not a BASIC pro- 
gram anymore. It is a special machine 
language program referenced by the 
BASIC interpreter. Once protected by 
HIDDEN BASIC there's no way to undo itl 
Tape $19.95 



SPECTRUM PROJECTS 

93-15 86th Drive, Woodhaven, NY 1 1421 
(212) 441-2807 (VOICE) • (212) 441-3755 (DATA) 

Add $3 for Shipping and Handling 
New York State Residents add appropriate taxes 

DEALER/CLUB INQUIRIES WELCOME 

Call the Rainbow Connection At (212) 441-3755 & (212) 441-3766 
for Rainbow Programs and Reviews 

> 
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The newest 
and fastest way 
to set up-to-date 
info and make contacts. 





Databasing 



by Terry Kepner 

Most COMPUTERISTS THINK of Online Com- 
puter Telephone Databases (OCTD) in terms of 
Dow Jones stock access or UPI News Reports, 
dismissing applications useful to general bus- 
iness and hobbyists. Unfortuately for these 
^ people, they're ignoring one of the hot- 
test and most important aspects of 
computers in today's society. , 



Telewriter-64 

the Color Computer Word Processor 



■ 3 display formats: 51/64/85 
columns x 24 lines 

■ True lower case characters 

■ User-friendly full-screen 
editor 

■ Right justification 

■ Easy hyphenation 

■ Drives any printer 

■ Embedded format and 
control codes 

■ Runs in 16K, 32K, or 64K 

■ Menu-driven disk and 
cassette I/O 

■ No hardware modifications 
required 



THE ORIGINAL 



Simply stated, Telewriter is the most powerful 
word processor you can buy for the TRS-80 
Color Computer. The original Telewriter has 
received rave reviews in every major Color 
Computer and TRS-80 magazine, as well as 
enthusiastic praise from thousands of satisfied 
owners. And rightly so. 

The standard Color Computer display of 32 
characters by 16 lines without lower case is 
simply inadequate for serious word processing. 
The checkerboard letters and tiny lines give you 
no feel for how your writing looks or reads. 
Telewriter gives the Color Computer a 51 
column by 24 line screen display with true 
lower case characters. So a Telewriter screen 
looks like a printed page, with a good chunk of 
text on screen at one time. In fact, more on 
screen text than you’d get with Apple II, Atari, 
TI, Vic or TRS-80 Model III. 

On top of that, the sophisticated Telewriter 
full-screen editor is so simple to use, it makes 
writing fun. With single-letter mnemonic 
commands, and menu-driven I/O and 
formatting, Telewriter surpasses all others for 
user friendliness and pure power. 

Telewriter’s chain printing feature means that 
the size of your text is never limited by the 
amount of memory you have, and Telewriter’s 
advanced cassette handler gives you a powerful 
word processor without the major additional 
cost of a disk. 




...one of the best programs for the Color 
Computer I have seen... 

— Color Computer News, Jan. 1982 



TELEWRITER-64 



But now we’ve added more power to 
Telewriter. Not just bells and whistles, but 
major features that give you total control over 
your writing. We call this new supercharged 
version Telewriter-64. For two reasons. 



64K COMPATIBLE 



Telewriter-64 runs fully in any Color Computer 
— 16K, 32K, or 64K, with or without Extended 
Basic, with disk or cassette or both. It 
automatically configures itself to take optimum 
advantage of all available memory. That means 
that when you upgrade your memory, the 
Telewriter-64 text buffer grows accordingly. In 
a 64K cassette based system, for example, you 
get about 40K of memory to store text. So you 
don’t need disk or FLEX to put all your 64K 
to work immediately. 



64 COLUMNS (AND 85!) 



Besides the original 51 column screen, 
Telewriter-64 now gives you 2 additional high- 
density displays: 64 x 24 and 85 x 24!! Both 
high density modes provide all the standard 
Telewriter editing capabilities, and you can 
switch instantly to any of the 3 formats with a 
single control key command. 

The 51 x 24 display is clear and crisp on the 
screen. The two high density modes are more 
crowded and less easily readable, but they are 
perfect for showing you the exact layout of 
your printed page, all on the screen at one 
time. Compare this with cumbersome 
“windows” that show you only fragments at a 
time and don’t even allow editing. 



RIGHT JUSTIFICATION & 
HYPHENATION 



One outstanding advantage of the full-width 
screen display is that you can now set the 
screen width to match the width of your 
printed page, so that “what you see is what 
you get.” This makes exact alignment of 
columns possible and it makes hyphenation 
simple. 

Since short lines are the reason for the large 
spaces often found in standard right justified 
text, and since hyphenation is the most 
effective way to eliminate short lines, 
Telewriter-64 can now promise you some of the 
best looking right justification you can get on 
the Color Computer. 



FEATURES & SPECIFICATIONS: 



Printing and formatting: Drives any printer 
(LPVII/VIII, DM P-1 00/ 200, Epson, Okidata, 
Centronics, NEC, C. Itoh, Smith-Corona, 

Terminet, etc). 

Embedded control codes give full dynamic access to 
intelligent printer features like: underlining, 
subscript, superscript, variable font and type size, dot- 
graphics, etc. 

Dynamic (embedded) format controls for: top, 
bottom, and left margins; line length, lines per page, 
line spacing, new page, change page numbering, 
conditional new page, enable/disable justification. 
Menu-driven control of these parameters, as well as: 
pause at page bottom, page numbering, baud rate (so 
you can run your printer at top speed), and Epson 
font. “Typewriter” feature sends typed lines directly 
to your printer, and Direct mode sends control codes 
right from the keyboard. Special Epson driver 
simplifies use with MX-80. 

Supports single and multi-line headers and automatic 
centering. Print or save all or any section of the text 
buffer. Chain print any number of files from cassette 
or disk. 



File and I/O Features: ASCII format files — 
create and edit BASIC, Assembly, Pascal, and C 
programs. Smart Terminal files (for uploading or 
downloading), even text files from other word 
processors. Compatible with spelling checkers (like 
Spell ’n Fix). 

Cassette verify command for sure saves. Cassette auto- 
retry means you type a load command only once no 
matter where you are in the tape. 

Read in, save, partial save, and append files with disk 
and/or cassette. For disk: print directory with free 
space to screen or printer, kill and rename files, set 
default drive. Easily customized to the number of 
drives in the system. 

Editing features: Fast, full-screen editor with 
wordwrap, block copy, block move, block delete, line 
delete, global search and replace (or delete), wild card 
search, fast auto-repeat cursor, fast scrolling, cursor 
up, down, right, left, begin line, end line, top of text, 
bottom of text; page forward, page backward, align 
text, tabs, choice of buff or green background, 
complete error protection, line counter, word counter, 
space left, current file name, default drive in effect, 
set line length on screen. 

Insert or delete text anywhere on the screen without 
changing “modes.” This fast “free-form” editor 
provides maximum ease of use. Everything you do 
appears immediately on the screen in front of you. 
Commands require only a single key or a single key 
plus CLEAR. 




...truly a state of the art word processor... 
outstanding in every respect. 

— The RAINBOW, Jan. 1982 



PROFESSIONAL 
WORD PROCESSING 



You can no longer afford to be without the 
power and efficiency word processing brings to 
everything you write. The TRS-80 Color 
Computer is the lowest priced micro with the 
capability for serious word processing. And 
only Telewriter-64 fully unleashes that 
capability. 

Telewriter-64 costs $49.95 on cassette, $59.95 
on disk, and comes complete with over 70 
pages of well-written documentation. (The step- 
by-step tutorial will have your writing with 
Telewriter-64 in a matter of minutes.) 

To order, send check or money order to: 

Cognitec 

704 N. Nob Ave. 

Del Mar, CA 92014 

Or check your local software store. If you have 
questions, or would like to order by Visa or 
Mastercard, call us at (619) 755-1258 
(weekdays, 8AM -4PM PST). Dealer inquiries 
invited. 

(Add $2 for shipping. Californians add 6^0 state tax. Allow 2 
weeks for personal checks. Send self-addressed stamped 
envelope for Telewriter reviews from CCN, RAINBOW, 
80-Micro, 80-U.S. Telewriter owners: send SASE or call for 
information on upgrading to Telewriter-64. Telewriter- 
compatible spelling checker (Spell ’n Fix) and Smart Terminal 
program (Colorcom/E) also available. Call or write for more 
information.) 

Apple 11 is a trademark of Apple Computer, Inc. ; Atari is a 
trademark of Atari, Inc.; TRS-80 is a trademark of Tandy 
Corp; MX-80 is a trademark of Epson America, Inc. 
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For example, did you know: There's a 
database devoted to environmental is- 
sues, which will keep you up-to-date on 
all aspects of pollution and the efforts to 
control it? There's a database that lists all 
the U.S. patents in several fields, so you 
can check to see if your latest brainstorm 
is unique, or to find a product your com- 
pany can market? You can do your own 
airline ticket reservations and trip plan- 
ning? You can access a university library 
at home? That you can leave your resume 
on-line so companies looking for em- 
ployees can see it and contact you if 
they're interested? There's even a data- 
base of professional technical writers 
that you can search for just the right per- 
son to review your latest product (or 
create a book you want to publish, if 
you're a book publisher). 

All these and over a thousand other 
databases are available to you through 
telecommunications. For the hobbyist, 
many of these databases are a goldmine 
of information, services, and like-minded 
friends'. That's right, you can meet hun- 
dreds of people who share your interests 
without ever leaving the comfort of your 
home. And you can send messages and 
pick them up at any time that's conven- 
ient (well almost, since some databases 
restrict hobbyists to night and weekend 
use only). Databases provide all the con- 
venience of a fraternity or club, without 
the normal limitations of location, time, 
or distance. 

You can get almost instant help with 
any problem by just asking your fellow 
members for assistance (and if it's com- 
puter related, they'll probably know more 
than the salesman who sold you your 
equipment). 

The list is almost endless, with special 
interest groups and databases for avia- 
tion, medicine, authors, programmers, 
cooks, golfers, educators, ham radio 
operators, literature, and literally dozens, 
if not hundreds, of other subjects. 

Database services can be divided into 
four major categories: free public service 



bulletin board/database systems; day- 
time business systems that cater to busi- 
nesses and professionals, and charge ac- 
cordingly; night- and weekend-only ser- 
vices for hobbyists; and 24-hour com- 
mercial services that charge different 
rates for prime time (usually 8 am to 5 
pm) and non-prime time (nights, week- 
ends, and holidays). 

The hobbyist's systems are put to- 
gether on equipment owned and oper- 
ated by people who do it for the fun of 
it, or by businesses who want to make it 
possible to communicate with their cus- 
tomers and other interested parties who 
can't or won't call during normal office 
hours. Most of the time these systems 
are hodge-podges of whatever software 
and hardware is at hand, and almost al- 
ways use microcomputers. Although 
small, these systems have a definite 
flavor and favor the personal tastes of 
the owner and/or operator. Generally 
they're more fun, and many aren't afraid 
to experiment with new ideas. 

Access to the hobbyist systems is di- 
rect-dial. There's no charge for using 
these services, you pay only for the phone 
call. If the board is local, or not too far 



Dialog, I can call them long distance from 
New Hampshire at about $12 an hour 
through the Bell system, or call the Tym- 
net phone node in a nearby town and 
pay only $2 an hour. 

The night-only services are usually big 
daytime services that want to tap the 
night crowd and make some extra money 
rather than letting their computers sit 
idle half the day. To keep expenses 
down, they offer far fewer databases at 
night, usually only the most popular (this 
also keeps their day customers from 
switching to night use and cutting the 
service's daytime revenues). Most of 
these services have telephone network 
agreements, easing the user's phone bill. 

The full-time services offer all their 
databases all the time. For efficient use of 
their computers (to discourage over- 
crowding during peak hours of opera- 
tion), they charge one rate during prime 
time hours and another, lower rate the 
rest of the time. The prime time rate is 
based on the fact that many businesses 
use the service during the day, and are 
willing to pay a premium rate for fast re- 
sponses. After business hours, however, 
the rate is lowered to encourage hobby- 



"These networks charge customers 
a rate much lower 
than time on AT&T's Bell system." 



away, this can be very inexpensive. If the 
board is across the country, the phone 
charges can start to look like the national 
debt. 

The day-time only services are usually 
designed for specific industries or pur- 
poses, and the owners anticipate that 
only businesses or professionals will be 
using the service. These services are usu- 
ally operating with large macro comput- 
ers like the DEC-1 Os, or IBMs, so they 
charge their customers for the amount of 
computer time used during the call. As a 
result, customers pay not only a phone 
bill, but a connect charge, usually based 
on which database is being used by the 
customer. 

To help keep the customer's phone bill 
down to reasonable levels (daytime is 
full-charge for your phone call, don't 
forget), many commercial services have 
agreements with one or more telephone 
networks such as Tymnet, Telenet, or 
GTE net. These networks supply local 
numbers (called nodes) in many cities, 
and charge customers a rate much lower 
than equivalent time on AT&T's Bell sys- 
tem. For example, if I want to log-on to 



ists, or businesses with smaller budgets, 
to use the otherwise idle equipment. 

An example of this is the recent rate 
changes implemented by CompuServe. 
They raised the night rate by a dollar an 
hour, and lowered the day rate by almost 
ten dollars per hour. Apparently so many 
people were using the system at night 
that idle periods were appearing during 
the day. With the new rate structure, 
many businesses that logged on at night 
have moved to daytime. 

The full-time services are available 
through telephone networks, and at 
least two offer their own telephone net- 
work at no extra charge. If you live in one 
of the hundreds of cities with the ser- 
vice's nodes, the only charge is for your 
actual connection time on the service, 
which can be a real money saver over the 
course of a year. 

Types of Databases 

The databases themselves are divided 
into three types: full text; bibliographic; 
and informational. The full text data- 
bases are like a library with articles, docu- 
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merits, books, and stories retained in 
their complete form: nothing is left out. 
This is the most expensive type of data- 
base; the volume of information stored 
is tremendous, and is expensive to put 
into magnetic form. A particular article is 
located by searching the words in the 
title, the author's name, specific descrip- 
tive code words, or even the entire docu- 
ment, for matches with a list of words 
supplied by the user. When matches are 
found, you're notified how many times 
the matches appeared. If you want, you 
can read the names of the documents 
that matched and select those you want 
to read. This is the most comprehensive 
method of information searching, since 
the entire article can be scanned for 
matches. Its disadvantage is that the 
number of documents available is limited 
by the size of the total system, which in 
turn decides the cost of the sen/ice. 

The bibliographic databases are a 
combination of a library catalog system 
and a Reader's Digest approach. The arti- 
cle title, descriptive words, and author's 
name are stored and used as search fields. 
The entire article is not available; ab- 
stracts (short condensations) of each 
article are maintained in storage. For the 
full text you are referred to the original 
published version, which many of the 
services will provide for a fee. 

These services are slightly less expen- 
sive than the full text services, and cover 
a much wider range of material and sub- 
jects (since each entry is much shorter 
than the full text version), but are handi- 
capped by the fact that someone has sig- 
nificantly shortened the original article 
into an abstract of generally only one or 
two paragraphs in length. In doing so, 
the abstractor may have eliminated your 
search word or phrase. Also, the abstract 
might not have been done well. 

The final type can be regarded as a 
"just facts" database: the information 
stored is raw data, such as immigration 
records, population data, stock market 
performance records, and many other 
time-based sets of data. 

Any database service can offer indi- 
vidual or combination of types of data- 
bases, depending on what group of users 
they want to attract. 

For the hobbyist, the free databases 
are the most used aspect of telecom- 
munications. Since these services don't 
charge for connection time, the only ex- 
pense is the phone bill itself. There are 
hundreds of these public bulletin boards 
across the country, making them con- 
venient and easy to use. The "homey" 
atmosphere of these small systems is also 
a powerful attraction, as is the subject 
matter. You can find a public bulletin 
board on almost any aspect of our soci- 



ety, including match-making and alter- 
native life styles. Most of these bulletin 
boards have free programs or databases 
written and compiled by the different 
members, which can be easily down- 
loaded to any other member's computer. 
The disadvantage to these systems is that 
many of them are offered only during re- 
stricted periods of time, usually evenings, 
weekends, and holidays. 

Businesses and professionals have 
even more services and databases avail- 
able, especially since many services are 
designed for specific businesses. The 
only requirement for a business to use 
telecommunications is to decide on the 
cost-effectiveness of using the data- 
bases: the information or contacts re- 
ceived must be worth the expense incur- 
red working the database service. 

Businesses 

While most businessmen and profes- 
sionals use computers for word process- 
ing and running their business, they're 
missing out entirely on the computer's 
information-gathering aspect. Not many 
realize they can use their computer to 
get, analyze, and act on information be- 
fore the competition. In the past, the 
only method of acquiring information 
was from periodicals. 

With the proliferation of computers, 
and easy access to major databases via 
telephone, this has changed dramati- 
cally. Instead of waiting for industry spe- 
cific publications for news (usually two or 
three months after the fact), you can call 
up the appropriate database for your in- 
dustry and get the details of the latest de- 
velopments only days, sometimes hours, 
after the fact. This is a potential that can 
make or break a company in today's fast- 
moving market. 

Several stories circulating illustrate 
this. One concerns an investor ap- 
proached by two inventors with a hot 
new product: digital laser disk audio re- 



cording. The investor went to a market 
research firm to try to gauge the poten- 
tial of this new technique. The research 
firm, in turn, called up the Dialog data- 
base service with their office computer. 
Searching the U.S. patent section re- 
vealed several patents on similar devices, 
and a search of the Adtrack section (a 
compilation of advertisements in 148 
publications) garnered advertisements of 
a product similar to the device the two in- 
ventors had described. Total investment 
was several hours of time, with less than 
20 minutes spent telecommunicating. 

The investor went home happy be- 
cause he hadn't wasted his money in a 
"new" product that wasn't, and the in- 
ventors went home, chagrined. 

Another story involves a doctor, who 
had a patient with an unusual complaint. 
The doctor remembered reading some- 
thing about someone with just the same 
symptoms. A search of Medline, a data- 
base of 3.8 million records of medical ar- 
ticles and reports, put her on the track to 
a possible diagnosis. 

This type of activity is not at all un- 
usual. Dialog, for instance, (a service 
mentioned previously) has over 200 dif- 
ferent databases to choose from, which 
makes it the largest multi-database ser- 
vice around. And it's literally just a phone 
call away. Many other data services are 
on the market. 

Tariff 

Data services can also be a powerful 
political tool. The results of the recent 
break-up of AT&T area prime example of 
this. As a consequence of the break-up, 
Southwestern Bell Telephone decided to 
enforce a "data communications tariff" 
on all telephone lines connected to a 
modem. This tariff was established in the 
late sixties by AT&T as a method of recov- 
ering their investment when they up- 
graded standard telephone lines to reli- 
able computer communication stan- 
dards. They invoked this tariff only with 

+ more 
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large companies, at least until now. 

With the proposed break-up and sub- 
sequent loss of long distance revenue, 
Southwestern Bell decided to implement 
this tariff on all modem users, to the tune 
of a $50 per month charge. This tariff 
was instituted apparently without the 
company's needing to upgrade the tele- 
phone lines being charged. Since most 
people who buy equipment that at- 
taches to the telephone lines abide by 
the regulation that requests they contact 
the telephone company and report their 
new purchase, Southwestern Bell would 
immediately realize an increase of in- 
come in the thousands of dollars. 

Businesses were, of course, quite up- 
set; but hobbyists were really burned. 
Under the proposed standard, if you 
used your telephone with a modem, re- 
gardless of whether you used it once a 
month or every day, your bill would have 
this tariff attached. Considering the 
numbers of hobbyists with modems 
(hundreds of thousands) not a small 
amount of money was in question. Since 
many hobbyists couldn't afford the extra 
$600 a year, they would be forced to give 
up their data communications. The tariff 
would probably also kill all hope of mak- 
ing home videotext operation inexpen- 
sive and convenient, not to mention crip- 
pling the University mainframe to home 
education field. 

Southwestern Bell is the only one 
charging a tariff at present; the other 
telephone companies are waiting to see 
the results. 

Congressional Representative Frank 
Potter, Chief Counsel to the House Com- 
mittee on Energy and Commerce Com- 
mittee, is a member of CompuServe and 
the Model 100 Special Interest Group 
(SIG). When he heard about the tariff he 
started the wheels moving to exempt pri- 
vate individuals from the charges. Hun- 
dreds of CompuServe members responded 
within a few days to his request for infor- 
mation and letters. It took only a few 
weeks to establish a nationwide organi- 
zation that would have taken months to 
organize using more traditional meth- 
ods. Information was collected and dis- 
tributed as fast as it appeared. Interested 
parties signed on to catch up with cur- 
rent events and the present status of the 
battle, regardless of their physical loca- 
tion in the country or the time of the day. 
It now looks like private users and some 
businesses will be exempted from the 
tariff. The battle is still in progress at the 
time of this writing, with reports appear- 
ing periodically in the Telecommunica- 
tions SIG. 

Private computer telecommunications 
may be one way for the average citizen 
to fight the “big brother" syndrome of 






ROAR! 



Do tricks with your computer without 
breaking your wallet's spirit! A subscrip- 
tion to Chromasette gets you a tape or 
disk full of quality programs delivered by 
First Class Mail every month! Write for 
more information or, better yet, try a Back 
Issue. At $6.00 for 6 to 8 programs on 
tape ( $1 1 .00 on disk), you'll see just how 
good and inexpensive Chromasette 
software is. 

The Bottom Line: TOpe Disk 

1 year (12 issues) $50.00 $95.00 

6 months (6 issues) $30.00 $55.00 

Single Issues $6.00 $11.00 

Calif residenrs add 6% to single issues First Class postage to 
N Amer included Overseas add SI0 to subscriptions and SI to 
single issues Sent AO rate All back issues from July 1981 avail- 
able— ask for list Programs are for the Extended BASIC model 
and occasionally for disks 




RO. Box 1087 Santa Barbara, CA 93102 
(805) 963-1066 



government and large corporations, 
using computers to wage the battle 
against bureaucratic computerization. 

What's Available 

Here's a list of the more popular ser- 
vices available: 

BRS/After Dark, 1 200 Route 7, Latham, 
NY 12100,(518)783-1 161 

With more than 20 databases and 
electronic mail service, BRS is advertised 
as "your own library at home." Data- 
bases include Books In Print and BioSci- 
ence Information Service. Initial fee is 
$50, hourly connection fees range from 
$6 to $1 5, with a $12 monthly minimum. 
As its name implies, it's available only in 
the evenings. 

CompuServe, P.O. Box 20212, Colum- 
bus, OH 43220, (614)457-8600 

CompuServe is geared more for pro- 
viding services than databases. Specific 
application programs are supplied for 
purposes such as Fortran and Pascal pro- 
gramming, word processing, and cross 
assembling, for translating machine code 
programs from one computer processor 
to another (Z-80 to 6809, for example). 
Special interest groups are available for 
different computers, hobbies, and busi- 
nesses; a special CB radio-type computer 
simulation (allowing large groups to 
communicate, like conference calls on 
normal telephones); on-line interactive 
games; news services; financial reports; 
and the Dow Jones service are only a very 
few of the over six hundred activities, 
databases, and services available. Initial 
fee depends on the options you chose: 
$19.95 is the lowest priced, providing a 
user ID number and one hour of free 
time. For $29.95 you buy the ID number, 
one hour of time, and the videotext pro- 
gram for your computer, if you have a 
Radio Shack TRS-80 computer. Another 
package includes the ID number and five 
hours time for $39.95. On-line fees are 
$6 for night and weekend use, and 
$12.50 an hour for daytime use. Some 
services have extra fees for their use. Ac- 
cess is through Tymnet, GE Net, and free 
telephone lines in many major popula- 
tion centers. Principal users are hob- 
byists, businesses, and professionals. 

Connexions, Professional Data Corpo- 
ration, 55 Wheeler St., Cambridge, MA 
02138, (617)492-1690. 

Connexions is a database of job open- 
ings. Interested people query the job 
database and then forward a copy of 
their resume to prospective employers. 
Over 100 high technology companies 
use this service. Connection rates are 




TOOLS 



Programs that make it easy to exploit 
the power and beauty of your Color 
Computer without making it hard 
on your wallet: 



Graphics #1 - Displays and text de- 
lightfully manipulated! Watch and use 
First Cover, Drawer (the best drawing 
program anywhere), Graphtext (puts text 
on the graphics screen). Smalltext, Rotate 
(create and spin 3D objects in real time). 
World Map, 3D World, Star Map. String 
Art. Kaleidoscope, and Display Demo 
(text screen wizardry)! 

Utilities #1 - Programming is simpler 
when you use Lister, Listmod. Newtrace 
(a better TRON), Lazkey (define keys as 
phrases). Append (easily combine two 
BASIC programs). BASIC Map. Varmap. 
Deleter, and CK Monitor (look at and 
modify memory). 

Disk Utilities #1 - Harness the hidden 
powers of your disk system with Disk Edit 
(change things on disk directly). Disk Aid, 
Offset (EXECs most tape-only programs). 
Track Lock, DIR Save/Get (foil I/O errors), 
Cataloger, Master Catalog (keep track of 
your program library), and File Copy (a 
better BACKUP). 

Choose any one of the three packages 
for just $12.00 ($17.00 on disk)! 




- a lot of software for a little silver 



See your dealer or: 

Write or call us direct at PO. Box 21 101. 
Santa Barbara CA 93121 (805) 966-1449 
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Your One Stop Station 
For Computer Programs 

We Pay Postage! 

Ask About Our 
Unclaimed Freight 

No Other Discounts Apply 

Zaxxon (32K) Tape or Disk $31 .50 
Disk Omni Clone $31.95 
Tape Omni Clone $23.95 
Sea Dragon (32K) $30.95 
Arex (16K) $30.95 

Ms Gobbler (32K) 

Storm Arrow, Lancer (32K) 

Gallax Attax, Lunar Rover (32K) 

Ghost Gobbler, Whirly Bird Run 
Froggie, Cubic (32K) 

$19.95 ea. 

Buy 1 Program Get 10% Off 
Buy 2 or More Programs 
Get 15% Off 

Except Prickly-Pear Software (15% Off As Shown) 

Silverware 

Practical # 1 , Utilities # 1 
Graphs & Charts #1 
Disk Utilities #1 

$18.95 

Tom Mix Software 

* Donkey King (32K) $26.95 
Katerpillar Attack $21.95 
Space Shuttle (32K) $28.95 
Trap Fall, Frog, Grabber (32K) 

Buzzard Bait (32K), Cu*ber (32K) 

$27.95 ea. 



Anteco Software 
Pinball $24.95 
8 Ball $29.95 
Available in Rom Pac 
Pinball, 8 Ball $29.95 ea. 

Ghost Gobbler $25.95 ea. 

Whirly Bird Run, Gallax Attax $27.95 ea. 

Computerware 

Moon Hopper (32K) $24.95 
•Junior's Revenge (32K) $28.95 
*Bloc Head, $26.95 ea. 

Doodle Bug$24.95 
Grand Prix (32K), Shark Treasure 
$21.95 ea. 

Mark Data Products 

*Glaxxons, ‘Bumpers, 

*EI Bandito & ‘Cosmic Clones 

$24.95 ea. 

Datasoft, Inc. 

Moon Shuttle (32K) $29.95 
( Tape & disk) 

Pooyan (32K) $29.95 
(Tape & disk) 

Prickley-Pear Software 
75% OFF As Shown 

•Vikings, ‘Flight (32K), Jungle 

$16.95 ea. 

Colorkit Tape $29.70 Disk $33.95 
Mailing List (32K) Disk $42.45 
Tee Off, Adventure In Wonderland (32K) 

Tape $21 .20 ea. Disk $25.45 ea. 

Kraft Joystick 
The Best $39.95 ea. 

1 Year Warranty 

Adventure Int’l 

Fire Copter (16K) $24.95 
Airline $24.95 

•Also available on disk (32K) at extra charge. All t 
programs (16K) on cassette unless otherwise ' 
stated. Send for free complete listing! WE pay post- c 
age, YOU save money! (in the U.S. and Canada). c 
TN residents add 6.25% sales tax, COD. orders c 
add $2.00. 

(615) 875-8656 • P.O.Box 15892 
Chattanooga, TN 37415 




$7.50 an hour, with full refund if a job is 
found through the service. Principal 
users are businesses and individuals. . 

Delphi, General Videotex Corporation, 

3 Blackstone St., Cambridge, MA 02139 
(617)491-3393 

Delphi features electronic mail, bank- 
ing, UPI newswire, airline information, a 
bulletin board, and Comp-U-Store. Initial 
fee is $49.95, with on-line connection 
fee of $16 per hour for prime time and 
$5 per hour non-prime use. Nationwide 
access is through Tymnet. Principal users 
are hobbyists, but Delphi is now trying to 
attract more businesses. 

Dialog Information Services, Inc., 

3460 Hillview Ave., Palo Alto, CA 94304 
A subsidiary of Lockheed, Dialog is a 
large collection of over 200 databases 
with half a million subscribers. The infor- 
mation is primarily abstracts of technical 
journals and government information. 
Keyword search functions let you ex- 
amine the databases for mention of a 
topic or topics of interest. The search 
scans approximately 20,000 documents 
in under five minutes. Databases include 
Trademarkscan (600,000 trademarks as 
on file with the U.S. Patent and Trade- 
mark Office), MIDEAST File, and Medfile. 
No initiation fee is required, but the con- 
nection fees range from $1 5 to $100 or 
more per hour, depending on the data- 
bases being accessed. Principal users are 
researchers and businesses. 

Dow Jones, P.O. Box 300, Princeton, NJ 
08540, (609)452-2000 
This is the Dow Jones Stock service, 
with information from the stock ex- 
change floor delayed by 15 minutes. 
Databases include abstracts from the 
Wall Street Journal, Barrons, and the 
complete text of the Academic American 
Encyclopedia. Electronic mail and bulle- 
tin board are not yet supported. Initial 
fees are between $50 and $90, connec- 
tion fees vary according to the database 
being accessed. Principal users are stock 
exchange businesses and some individu- 
als. Also available through several of the 
other services listed here (CompuServe 
and Delphi are two). 

Hutonline, E.F. Hutton, One Battery 
Place Plaza, NY, NY (2 1 2)745- 5000 
5000 

Limited to E.F. Hutton and their clients, 
Hutonline allows clients to access their 
account statements, make electronic 
mail transfers to their brokers, and gives 
access to investment databases created 
by the Hutton Research teams. Initial fee 
is $25, and $17 per month for unlimited 
use. 



HRS: NET, 20 Park Plaza, Boston, MA 
02116(617)338-6313 
The opposite of Connexions, this is an 

on-line resume service. You leave a brief 
resume of your qualifications on their 
database and prospective employers scan 
the list, then they use the electronic mail 
service to request that you send your 
complete resume to them. Principal 
HRS: NET users are freelance profession- 
als and businesses. 



Knowledge Index, Dialog Information 
Service, 3460 Highview Avenue, Palo 
Alto, CA 94304, (415)852-3901 
This is a cut-down version (12 data- 
bases) of the Dialog service, operating 
during non-prime time hours only. Users 
are hobbyists and some businesses. 

The KUSSMAUL Encyclopedia, Gener- 
al Videotex Corporation, 3 Blackstone 
St., Cambridge, MA 02139, (617)492- 
3393 

A set of four services, the encyclope- 
dia, Dow Jones, CompuServe, and Comp 
★U^Star. The encyclopedia has thou- 
sands of subjects, with updates daily. 
Principal users are hobbyists and busi- 
nesses. KUSSMAUL is also available as a 
part of Delphi. 

Medical Information Net, GTE Telenet, 
8229 Boone Blvd., Vienna, VA 22 1 80 
The American Medical Association is 
sponsoring this as a physician's electron- 
ic mail service and bulletin board, with 
schedules of AMA meetings and con- 
tinuing education. Initial fee is $ 1 00 ($75 
for AMA members). Connection fees are 
$8 per hour non-prime time, and $1 6 for 
prime. The databases cost $27 per hour. 

Newsnet Inc., 945 Haverford Rd., Bryn 
Mawr, PA 1 90 1 0 (2 1 5)527-8030 
Newsnet specializes in business infor- 
mation, supplying the complete text of 
1 50 newsletters before they're available 
on the newsstands. Subscribers are 
charged $24 per hour (300 baud), or $48 
per hour (1200 baud) for searching, UPI 
and PR Newswire, and general examina- 
tion of the service. Viewing the actual 
full text of a newsletter carries an addi- 
tional charge of at least $24 per hour, de- 
pendent on the rate set by the publisher 
of the newsletter. No initial fee, there is 
a $1 5 per month minimum charge. Prin- 
cipal users are businesses. 

Online Computer Library Center, 

6565 Frantz Rd., Dublin, OH 43017 
OCLC provides bibliographic services 
for municipal, college, and private li- 
braries. Principal users are researchers. 
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PhotoNet Computer Corporation, 

500 Park Avenue, NY, NY 10022 (212) 
750-1386 

A service for photographers, advertis- 
ing agencies, and publishers, providing 
electronic mail, bulletin boards, and an 
electronic magazine with news on the 
latest news, editorials, and opinion polls. 
Initial fee is $ 1 00, connect-time fees vary 
according to database use. 

The Source, 1616 Anderson Rd., Mc- 
Lean, VA 22102, (703)734-7500 
The Source is geared more for provid- 
ing services than databases. Specific ap- 
plication programs are supplied for pur- 
poses such as Basic, Fortran, and Pascal 
programming, word processing, and so 
forth. On-line program and data storage 
are provided, with access to financial 
news and other information available. 
Electronic mail is very simple to use, and 
popular. Initial fee is $100, connect time 
fees range from $7.75 off-hour to $20.75 
prime time. Extra fees are applied when 
using certain databases. Principal users 
are hobbyists and businesses. 

Online Computer Telephone Direc- 
tory, J.A. Cambron Co., P.O. Box 1 0005, 
Kansas City, MO 64111, (81 6)756-1 847, 
CompuServe ID# 70040,41 4 
This isn't a service, per se, but a news- 
letter listing all the current hobbyist bul- 
letin boards in the country, with articles 
and reviews on communication programs, 
hardware, and services. For the most 
complete and up-to-date listing of 
"free" computer bulletin boards, this 
newsletter is the best buy. Principal users 
are hobbyists. 

Directory of On-line Databases, 

Cuadra Associates, 2001 Wilshire Blvd., 
Suite 305, Santa Monica, CA 90403 
Like the previous listing, this is not a 
database, but a directory of the available 
databases and sen/ices, having about 
1 700 entries. The subscription rate is $75 
per year (two directories and two update 
supplements). 

Directory of Online Information Re- 
sources, CSG Press, 11301 Rockville 
Pike, Kensington, MD, 20895 
Another publication covering the 
available databases, but less comprehen- 
sive than the previous listing. Single is- 
sues are $22.50, a two year subscription 
(four issues) is $60. ■ ■ ■ 



Eds. Note — Lawyers who are readers 
should note that there are at least two 
law databases available. Names and ad- 
dresses should be available from the 
sources listed a bo ve. 




A computer assisted learning tool 
that will pay for itself. 

Expert play will become 
easy and natural. 

Read about BLACKJACKPRO on page 82 

BLACKJ ACKPRO is a trademark of Skill ware Corporation 
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TRS-80C*and TDP lOO* SPECIALISTS 

COLORFORTH* 

IS THERE LIFE AFTER BASIC? Yesl with COLORFORTH, a new. high level language for the color computer. 
COLORFORTH, a figFORTH compiler, has an execution time as much as lO to 20 times faster than Basic, 
and can be programmed faster than Basic. COLORFORTH is highly modular for easy testing and debug- 
ging. COLORFORTH has been specially customized for the color computer and requires only 16K. It does 
not require Extended Basic. When you purchase COLORFORTH.you receive both cassette and RS/DISK 
versions, the figEDITOR and an extensive instruction manual. Both versions and 75 page manual, all for 
only S 49.95 

PC FORTH 

FORTH for the IBM PC*and Zenith Z-lOO* All the features of COLORFORTH, but customized for the IBM 
and Zenith Z-lOO personal computers. Requires 32K and MS/DOS or IBM/PCDOS. On 5-1/4" SSDD 
diskette. Complete with 75 page manual, just S 59.95 

MASTER MIXOLOGIST* 

The Bartenders’ Guide 

This disk based program for the color computer contains recipes for over 150 of your favorite bar drinks- 
both alcoholic and non-alcoholic. MASTER MIXOLOGIST is menu driven for ease of use. Requires 16K 
and one RS/DOS drive. Get this one today, it will be great for your next party $ 19 95 

ARMADILLO BUG* 

MACHINE LANGUAGE MONITOR 

More and more programs are appearing in magazines written in Machine Language. Now with AR- 
MADILLO BUG, you can easily enter Machine Language programs without a lot of time consuming 
"pokes". ARMADILLO BUG is an excellent system for beginners to learn to write and debug their own 
Machine Language programs as well. This package includes: Memory examine and change. Move. 
Punch and Load: Fill commands and morel Runs in 16K. and DOES NOT require Extended Basic. Com- 
plete on cassette with printed manual. Just $ 14.95 

COLOR BIORHYTHMS 

This is a neat BIORHYTHMS program you can use to chart the future (or past). Includes High Resolution 
graphics without Extended Basic being required. Runs in 16K. On cassette, with instructions $ 10.95 

DEALER and AUTHOR INQUIRES INVITED 

Please add $ 200 shipping in U.S. Texas residents add 5 % 

Foreign orders must be in U.S. funds drawn on U.S. banks, or Mastercard and VISA 



ARMADILLO INTL SOFTWARE 
P.O. BOX 7661 
AUSTIN.TEXAS 78712 



PHONE (512)835-1088 
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We don't care 
which computer you own. 




get the most out of it 
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CompuServe puts a world of information, communications, and entertainment at your fingertips. 



CompuServe is the easy to use videotex 
service designed for the personal 
computer user and managed by the com- 
munications professionals who provide 
business information services to over one 
fourth of the FORTUNE 500 companies. 

Subscribers get a wealth of useful, 
profitable, or just plain interesting infor- 
mation like national news wires, electronic 
banking and shop at home services, and 



sophisticated financial data. Plus, a 
communications network for electronic 
mail, a bulletin board for selling, swap- 
ping, and personal notices and a multi- 
channel CB simulator. 

You get games on CompuServe, too. 
Classic puzzlers, educational, sports and 
adventure games and fantastic space 
games featuring MegaWars, the “ultimate 
computer conflict.” 



To learn more about CompuServe, call 
toll-free, 800-848-8199, for an illustrated 
guide to the CompuServe Information 
Service. The videotex service for you, no 
matter which computer you own. 

CompuServe 

Consumer Information Service. P. O. Box 20212 
5000 Arlington Centre Blvd., Columbus, OH 43220 

800 - 848-8199 In Ohio Call 614-457-0802 

An H&R Block Company 
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Cashbook 



32K Extended Color Basic 
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Here's a simple program 
to use at home, 
in your user's group, 
or in any other dub application. 




I 'VE SERVED AS TREASURER for sev- 
eral organizations, including our 
local users group. Since I dislike 
bookkeeping, but love playing with my 
computer, I've written a simple cashbook 
program which takes a lot of the 
drudgery out of record keeping. 

CASHBOOK is a single-entry book- 
keeping system — i.e., no debits and 
credits. Revenues are recorded as posi- 
tive amounts and expenditures are 
shown as negative amounts. The user 
decides how many revenue and expendi- 
ture account codes are to be used, and 
chooses the account names. For each ac- 
count the operator chooses a two-char- 
acter abbreviation and a full descriptive 
name. The program uses the abbrevia- 
tion to identify the account to which an 
item is charged. The full name is used for 
headings and for the statement of re- 
ceipts and disbursements. 

To produce a statement of receipts 
and disbursements, all the operator has 
to do is enter the time period covered by 
the statement. The computer does the 
rest. 

CASHBOOK is designed for small or- 
ganizations working on a cash basis, so 
there is no provision to produce a bal- 
ance sheet or to record any assets other 
than cash. CASHBOOK's bottom line 
represents cash on hand, in the bank, or 
embezzled by the treasurer. 

System Requirements 

CASHBOOK is designed for a disk sys- 
tem with a minimum of 32K RAM. You 
could use this program on a cassette sys- 
tem if you modify the Load Data and 
Save Data routines (Lines 3000 - 4090) 
to use cassette input/output. CASHBOOK 
will not fit into a 16K system. 



by D.E. Wood 




Photo 1. CASHBOOK Menu 

Instructions for Use 

• Initialization — When you run the 

program, it starts by showing the drive 
zero directory. That's for the benefit of us 
forgetful types who can't remember 
what data file name we used last. 
CASHBOOK then asks for a data file 
name. Let's assume we're initializing a 
cashbook for our local computer club, 
and enter clubcash/dta as our data file 
name. 

The program then asks if this is the in- 
itial run for this data file. On future runs, 
just hit the Enter key in response to this 
query, and the program will proceed to 
load your data file. Since this is our initial 
run, respond with y and CASHBOOK will 
ask you to enter the maximum number 
of account codes you require. You won't 
be able to change this in future, so leave 
yourself room for expansion. For pur- 
poses of our example, enter 20 . 

CASHBOOK then asks how many ac- 
count codes are to be revenue accounts. 



Again, leave yourself room for adding 
new accounts later. Let's enter 9 . The 
other eleven accounts will be, by default, 
expenditure accounts. 

You are then asked for the name of 
the organization. Type the name and 
press Enter. 

The final step in the initialization proc- 
ess is to establish your account codes. 
You don't have to cover all possibilities 
here; you can add different account 
codes as you need them. You won't, 
however, be allowed to exceed the 
maximum number of accounts (20 in our 
example). 

Continuing with our example, let's as- 
sume we want to start off by setting up 
two revenue accounts, annual dues and 
bank interest, and two expenditure ac- 
counts, rent an d newsletter. 

As soon as you enter the organization 
name, the computer will print out a ref- 
erence number (from 1 to 20), the two- 
character abbreviation, and the com- 
plete account name for all 20 account 
codes. Since we haven't established any 
account codes yet, only the reference 
numbers will be shown on the screen. If 
you get a press enter to continue prompt, 
press Enter to get to the end of the list- 
ing. 

In response to the enter account num- 
ber query, enter 1 . CASHBOOK will then 
print out the present data for account 
code 1, which in this case is nothing. It 
will then ask you fora new two-character 
code. Enter mf. For the new long descrip- 
tion, enter ANNUALMEMBERSHIPFEES. 

CASHBOOK will again print out all the 
account codes, and ask you to enter a 
number. If you made an error entering 
the first item, enter 1 and re-enter the 
data for the membership fees. Other- 

t more 
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SUPER STATS — The most powerful statistics program avail- 
able for the CoCo/TDP. Multiple linear regression, forecast- 
ing, mean, standard deviation, correlation coefficients, co- 
variance, F and t tests. Powerful data editing and manipu- 
lation abilities. Data plotting. Student t tail areas, Gaussian 
cumulative probability distributions, and more. Flexible 
I/O (screen or printer, tape or disk). Very good documen- 
tation. 16K extended BASIC. Cassette $29.95. 

STRUCTURED MACROS — An assembly language program- 
ming tool for users of the Macro-80C assembler, by the Micro 
Works. Structured macros come close to transforming your 
assembler into a high-level language. Your programs become 
more understandable and debugging is simplified. Commands 
include IF, ELS, ENDIF, IFTST, IFCC, WHILE, ENDWH, 
REPEAT, and UNTIL. Disk $19.95. 



C.C. Three 

A powerful 'electronic spreadsheet', a full-featured word 
processor, and a flexible database - for an unheard of low 
price! This may be the ONLY SOFTWARE PACKAGE 
YOU'LL EVER NEED TO BUY for your computer. 

BOTH DISK AND TAPE VERSIONS OF ALL THREE 
PROGRAMS ARE INCLUDED (on tape) for the bargain 
price of $49.95! No need to pay for upgrades to disk later! 
Over 40 pages of documentation in an attractive vinyl binder. 
C. C. Writer and C. C. File require 16K, C. C. Calc needs 32K. 
All require Extended Color BASIC. Order yours NOW! 



PAGE PLUS — Attention BASIC programmers! Up to 56K 
available from your BASIC programs. This utility, written 
by Chris Hawks, does the memory management necessary to 
utilize the two 32K banks of memory. Easy enough for any 
"intermediate" level BASIC programmer to use. Works with 
64K systems. Cassett $27.95. Disk $29.95. 
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MYSTIC MANSION — New!! You'll be hearing lots about 
this incredible ALL GRAPHIC adventure. Explore the 
mansion and escape from the island, if you can! This one is 
tough to solve, but you'll have fun trying. For 32K Disk 
only. Disk $29.95. 



MDISK — Hal Snyder's latest breakthrough for the 64 Color 
Computer! MDISK lets you use the upper 32K of memory 
for rapid storage and retrieval of programs and data. Whether 
you own an actual disk drive or not, MDISK puts the 
"hidden" 32K to work for you as a "virtual disk," with 
capability to save and load up to 15 programs, view a dir- 
ectory of files stored in"page 1," kill unwanted page 1 files, 
execute BASIC or machine language directly from MDISK, 
chain to a BASIC program while preserving data already 
created, and more. MDISK is written in position independent 
code, and will work on disk or tape based 64K systems. 
Cassette $27.95. Disk $29.95. 

ROMBACK — Why pay more? The easiest to use ROM-pak 
dumping utility available! At the best price, too! Comes with 
full documentation, including detailed patching instructions 
to allow several popular "problem" cartridges to run from 
tape or disk. 64K Extended BASIC. Cassette $16.95. 

QUICKSORT — A machine language sort routine specifically 
designed to be used by BASIC programmers. Written in 
position independent code, works on tape or disk systems. 
16K required. Cassette $12.95. 

64K BOOT/PAGER — The 64K Boot allows you to modify 
BASIC by moving it from ROM to RAM. The PAGER is 
a menu-driven utility allowing you to manually page between 
the 32K banks of memory. Source code for both programs is 
included. Both run on 64K tape or disk systems. 

Cassette $12.95. 

WIZARD 64 — If you've got 64K, then this one's for you! 
Uses both 32K pages of memory for graphics and action. 
Challenging enough for adults, yet entertaining for younger 
players too. 64K Extended BASIC. Cassette $21.95 
Disk $23.95. 

SIMPLEX — Linear programming by the "simplex" method 
now available for the Color Computer. This powerful de- 
cision making tool finds the optimum "mix" for a given set 
of constraints. Disk compatible. 16 page manual included. 
16K Extended BASIC. Cassett $29.95. 



ORDERING INFORMATION 
*$10 shipping, handling, & insurance on printers. 

Amdisk, and monitors. $5 on modems. $2 on all other orders. 
All prices U.S. funds. 



We Love Canadian Orders! 
Inquire For Foreign Shipping 



Skyline Marketing Corp. 
4510 W. Irving Park Rd. 
Chicago, IL 60641 
(312) 286-0762 



Dealer Inquiries Invited 





AN ASTRONOMICAL ARRAY 
OF FEATURES 

FOR A DOWN-TO-EARTH PRICE 



MORE QUALITY: 120 cps • thruput time of 58 Ipm • high resolution 
(120x144) bit image & block (6x6) graphics • extra fast forms feed 
MORE FLEXIBILITY: super/sub script • underlining • backspacing 

• double strike mode • emphasized print mode • 816 character 
buffer • compatible with most software supporting leading printers 

• 10” carriage • 15” carriage Gemini-15 available 

MORE RELIABILITY: 180 day warranty (90 days for head & ribbon) 

• mtbf rate of more than 5 million lines • print head life of more than 
100 million characters 



THE GEMINI-10 X 




SAVE $100.00!!! 

Our incredible Gemini-10 package— a PRINTING SYSTEM ready to plug in to 
your Color Computer. NOTHING MORE TO BUY. Includes serial to parallel converter, 
graphic screen print software, deluxe user manual, and 5 minute setup instructions! A $479.00 value. Complete package 

Wide carriage Gemini— 15 also available: 

Package ONLY $579* 

Printer only $499* 



NEW 

LOW PRICES! 



ONLY $379* 

Order yours today! 
Parallel printer only, $299. 



GET THE MOST FROM YOUR SYSTEM WITH AN NEC MONITOR PACKAGE! 

Without a monitor, you’ll never know just how good your graphics are. Word processing 
becomes less fatiguing, programming more enjoyable. NEC is famous for excellent 
color reproduction and tack-sharp resolution. We take the work out of adding the monitor 
to your system by including a custom plug-in monitor driver (with color, monochrome, 
and audio outputs), any required cables, and easy setup instructions. Buy with 
confidence— we’ve done the “homework” for you! 

NEC 12” Color monitor (JC1212M) package ONLY $389* 

NEC 12” Green-screen (JB1260M) package ONLY $169* 

NEC 12” Amber screen (JB1205MA) package ONLY $219* 

True lower-case and inverse video— just plug in the LCA-47. Special price with 
monitor purchase $66. 



GET SMART!! GREAT DEAL ON HAYES SMARTMODEMS 

Hayes 300 baud Smartmodem— the amazing programmable auto-dial, auto-answer modem, now in a 
special package deal for your Color Computer. Buy the Hayes for list price, and at NO EXTRA 
CHARGE receive the Colorcom/E smart terminal program (cartridge or disk), an RS232 cable, and 
setup instructions! Act now! 

Hayes 300 baud Smartmodem package ONLY $289* 

Hayes modem with CC cable only, $249* 

Signalman Mark I modem, 300 baud direct connect, list $98, our price $86* 





The revolutionary 3” disk system! Two compatible 156K drives in a 
compact enclosure. Uses the rigid, protected 2-sided cartridge that 
has made others obsolete. Our package includes the Amdisk III, 
cable, disk controller, Disk BASIC manual, 12 cartridges, setup 
instructions, and a ML tape to disk program to help transfer your 
software! Everything you need, plus you save $50! 

Package price ONLY $689* Amdisk III plus cable only $479* 

Order Now!! 




SALE ON 
AMDISK III 
DISK SYSTEM!! 





UPS C.O.D. orders gladly accepted, 
$2.00 additional. 



SKYLINE 64K Memory Upgrade Kits 



8 guaranteed 200 n.s. 64K memory chips, solderless installation instructions, 
Skyline’s 64K BOOT and PAGER programs (a $19.95 value). All for the super 
low price of $59.00! Order yours today! 
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wise, enter 2 and then enter bi as the ab- 
breviation and bank interest as the long 
description. 

Now that the two revenue accounts 
are established, we can enter the dis- 
bursement accounts. In answer to the 
enter account number prompt, enter 
10 (remember, we decided that the first 
nine accounts were to be revenue 
accounts). Now enter re as the abbrevia- 
tion and rent as the full account name. 
Next, choose 1 1 and enter ne as the ab- 
breviation and newsletter as the full 
name. 

When the enter account number 
prompt appears again, just press Enter to 
indicate that the initialization process is 
complete. The program will then offer 
you the option of obtaining a printout of 
your account codes (see Figure 1), after 
which it returns you to the main menu, 
(see Photo 1 ). 



WINNIPEG MICRO - 80 USERS GROUP 
ACCOUNT CODES 



RECEIPTS 

1 MF ANNUAL MEMBERSHIP FEE 

2 BI BANK INTEREST 

3 

4 

5 

6 

7 

8 
9 

EXPENDITURES 

10 RE RENT 

1 1 NE NEWSLETTER 

12 

13 

14 

15 

16 

17 

18 

19 

20 

Figure 7. Account Codes 



• Add Data to File — This routine is 
used to enter your cash receipts and dis- 
bursements transactions. For each trans- 
action you are asked to enter a date, a 
description, an account code, and an 
amount. 

The date should be entered in the for- 
mat YYMMDD. March 15, 1983 would 
be entered as 830315. December 9, 
1983 would be entered as 83 1209. Since 
I often find that I have to enter several 
transactions with the same date, 
CASHBOOK is written so that, if you 
enter s as the date, the transaction will be 

» more 





CASHBOOK 
VARIABLES USED 


AC$( ) 


Full account code name 


B1$( ) 


Date of a transaction 


B2$( ) 


Description of a transaction 


B3$( ) 


Account a transaction is charged to 


B4$( ) 


Amount of a transaction 


c 


Maximum number of transactions that can be recorded 


Cl 


Maximum number of account codes 


C2 


Maximum number of revenue accounts 


CC 


Number of transactions so far 


FI $ 


Format string for PRINTUSING statements 


F3$ 


Format string for printusing statements 


F4$ 


Format string for printusing statements 


F5$ 


Format string for printusing statements 


F6$ 


Format string for printusing statements 


F7S 


Format string for printusing statements 


FA$ 


First day of period covered by Statement of Receipts 
and Disbursements 


FB$ 


Last day of period covered by Statement of Receipts 
and Disbursements 


FC$ 


Quotation marks — CHR$(34) 


FS$ 


Data filename 


FT$ 


Temporary data file name 


H 


Length of print line a heading is to be centered on 


H$ 


Heading of a statement 


HP$ 


Heading of a statement 


L 


Counter in For... Next loops 


LI 


Counter in For... Next loops 


LF 


Flag in sort routine 


Ml $ 


Menu choice 


N$ 


Name of organization 


Q 


Val(Q$) 


Q$ 


Account number that the operator wants a printout of 


R1 $ 


"Receipts" 


R2$ 


"Disbursements" 


S$ 


Description to be searched for 


SA$ 


Two-character abbreviation for an account code 


T 


Multi-purpose temporary variable 


T$ 


Multi-purpose temporary variable 


T( ) 


Total charges to each account code 


T1 


Length of underline when printing totals 


T1$ 


Temporary storage during sort 


T2$ 


Temporary storage during sort 


T3$ 


Temporary storage during sort 


TE 


Total expenditures 


TR 


Total receipts 


TR$ 


Used in calculating T1 


x$ 


Multi-purpose input string 


Y 


Counter for number of lines printed 


Y1 


Number of transactions to be printed per page 


Y2 


Counter for blank lines on transaction printout 
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From Our Closet To Yours... 

The Official 

‘Color 
Com 



Official TCCM Ca p 

Cool white mesh cap with 
choice of white or navy panel 
and visor. 



Official TCCM T-Shirt 



100% cotton in royal blue, 
black, maroon, and white. 

S, M, L, XL. 



YES! I need the 
latest in Color Computer 
fashion — please send me 
the following: 



QTY. 


ITEM 


COLOR 


SIZE 


PRICE 


S&H 


TOTAL 




Cap 






6.95 


1.50 






Adult 

T-Shirt 






6.95 


1.50 






Youth 

T-Shirt 






6.75 


1.50 






Adult 

Fashion 

Shirt 






15.95 


1.50 






Youth 

Fashion 

Shirt 






14.75 


1.50 












•»u 







Maine residents add 5% sales tax 




TOTAL AMOUNT (inch shipping & handling) 



□ Check or M.O. enclosed 

□ Visa □ MasterCard 

Exp._ 

Name 



Address 
City 



State . 



Zip. 



Mail to: 

The Color Computer Magazine 

CLOTHES CLOSET 

Highland Mill • Camden, ME 04843 

Please allow 3-4 weeks for delivery. 




Wardrobe 

Collection! 



Official TCCM Bab y 

Not for sale. 

But to dress him/her later on, 
T-shirts just like Mom’s 
in navy blue or white, 
sizes S, M, L. 

For the truly 

fashion-aware, we offer the 
official TCCM Fashion Shirt — 
our logo replaces the animal. 
Available in adult sizes 
S, M, L, XL, in your choice 
of white, navy blue, or red. 
50% cotton/50% polyester. 
Same shirt for the little ones 
in navy blue or white, 
sizes S, M, L. 




Pregnant 
with Style. 





Get the unrivaled COLOR POWER 
of The Color Computer Magazine 
going for you every issue, 
every month of the year— 

—at almost 50% OFF 

cover price! 

Check the 3-year rate below and save 
almost HALF OFF cover price! Provides 
long term protection against future 
rate increases, too. 



COLOR POWER features include FREE PRO- 
GRAMS (Games, Utilities, Business, House- 
hold); Software and Hardware Upgrades; 
Sound and Music Applications; How-to Tech 
Talk; Hews and Reviews and more. 



GUARANTEE: Cancel your 

subscription at any time and receive 
a full refund of the unused portion. 



FOR SPEEDY SERVICE: call our 
TOLL FREE number to place 
your subscription order: 

1 - 800 - 225-5800 




Detach card opposite or complete coupon below 
and mail today to: 

The Color Computer Magazine 

P.O. Box 468, Hasbrouck Heiahts, NJ 07604 



SAVINGS CERTIFICATE 

The Color Computer Magazine 
P.O. Box 468 • Hasbrouck Heights * NJ 07604 

YES , enter my no-risk Trial Subscription for the term and 
savings I've checked below. If not satisfied, I may 
cancel and receive a full refund of the unused portion. 

□ Three years, just $53.97. You save $52.23 (49%) off cover price. 

□ Two years, $39.97. You save $30.83 (44%) off the cover price. 

□ One year, $23.97. You save $1 1.43 (32%) off cover price. 

Outside U.S. add $10 per year postage. 

□ Payment enclosed □ Please bill me 

□ CHARGE IT to my: □ MasterCard □ Visa 

Acc't# Exp. Date 

Signature 

(print) Name 

Address 

City State Zip 

Please allow 4-6 weeks for delivery of first issue. HS84 






given the same date as the previous 
transaction. 

After entering the date, you are asked 
to enter a description of the transaction. 
If you enter s as the description, this 
transaction will be given the same de- 
scription as the previous one. 

CASHBOOK then prints a list of the 
available account codes. Choose an ac- 
count and enter its number. 

Next, you are asked to enter the 
amount of the transaction. If you chose 
an expenditure account in the previous 
step, the amount you enter will automat- 
ically be changed to a negative amount. 

There may be some circumstances 
under which you want a positive amount 
shown in an expenditure account. Forex- 
ample, you may have received a partial 
refund of a previously-entered expendi- 
ture. If you want this refund shown as a 
reduction of expenditures, enter the 
amount as a negative number; CASH- 
BOOK will change it to a positive num- 
ber. Since expenditures are negative 
amounts, this positive amount in an ex- 
penditure account will be treated as a re- 
duction of expenditures. 

Likewise, if you want a transaction to 
be recorded as a reduction to a revenue 
account, enter the amount as a negative 
number. 

When you've entered the amount, the 
transaction entry is complete and CASH- 
BOOK shows you what the transaction 
looks like. You are then asked for the 
date of the next transaction and the 
process is repeated. 

When you've entered all the transac- 
tions, just press Enter when asked for the 
date. You will then be returned to the 
menu. 

• Correct Data — This routine is fairly 
straightforward. Start by entering the 
date of the transaction you wish to cor- 
rect. CASHBOOK finds the first transac- 
tion with that date, prints the details of 
that transaction, and asks you if this is 
the one you want to correct. If it isn't, 
press Enter and CASHBOOK will find the 
next transaction with the specified date. 

When it finds the transaction you 
want, answer y to the this one (y/n)? 
query. You will then be asked for the cor- 
rected date, description, account code 
and amount. If any of these four fields 
are already correct, just press Enter when 
asked for the correction. 

When you've finished, CASHBOOK 
shows you what the corrected transac- 
tion looks like and returns you to the 
menu. 

• Display File — Video or Printout 

— This routine gives you the option of 
obtaining either a list of all transactions 



ora list of just those transactions charged 
to a specified account. Output may be di- 
rected to the screen or to a printer, de- 
pending on whether you chose "V" or 
"H" at the menu. 

To obtain a list of all transactions, just 
press Enter in response to the account 
NUMBER ? (DEFAULT IS COMPLETE FILE) prompt. 
For a list of all transactions charged to a 
particular account, enter the number 
shown to the left of the desired account 
code. 

Because of the limitations of the Color 
Computer's 32-character screen, only 
the first 12 characters of each transac- 
tion description are displayed on the 
screen. If you choose the printout option, 



about 40 characters of description can 
be printed. If you want to see the com- 
plete description for a transaction with- 
out using the printer, use the Correct 
Data routine to look up and display the 
transaction. 

If you choose the printout option, 
CASHBOOK will print a blank line after 
every fifth transaction. This is to make 
the data easier to read (see Figure 2). 

• Print Financial Statements — This 
routine is designed to be used with a 
printer. All the operator has to do is enter 
the time period covered by the state- 
ment. The program will then print a 
Statement of Receipts and Disburse- 



830108 


WINNIPEG MICRO - 80 USERS GROUP 
COMPLETE FILE 

FRED SMITH 


MF 


20.00 


e30i0e 


JOHN DOE 


MF 


20. 00 


830108 


DON RIGG 


MF 


20.00 


830108 


VINCE RIGG 


MF 


10.00 


830108 


DON RICE 


MF 


20.00 


830110 


JOE’S PRINT SHOP 


NE 


65.36- 


830122 


MARY BROWN 


MF 


20.00 


830122 


JIM KUBAS 


MF 


20. 00 


830122 


MEL SEDER 


MF 


20 . 00 


830122 


MIKE SEDER 


MF 


10.00 


830201 


HOME ST. CHURCH 


RE 


50.00- 


S30215 


DON RIGG - PHOTOCOPIES 


NE 


10.74- 


830228 


BANK OF MONTREAL 


BI 


1.50 


830108 


TOTAL = 35.40 

WINNIPEG MICRO - 80 USERS GROUP 
ANNUAL MEMBERSHIP FEES 

FRED SMITH 


MF 


20.00 


830108 


JOHN DOE 


MF 


20.00 


830108 


DON RIGG 


MF 


20.00 


830108 


VINCE RIGG 


MF 


10.00 


830 10e 


DON RICE 


MF 


20.00 


830122 


MARY BROWN 


MF 


20.00 


830122 


JIM KUBAS 


MF 


20.00 


830122 


MEL SEDER 


MF 


20. 00 


830122 


MIKE SEDER 


MF 


10.00 


830110 


TOTAL = 160.00 

WINNIPEG MICRO - 80 USERS GROUP 
NEWSLETTER 

JOE’S PRINT SHOP 


NE 


65.36- 


830215 


DON RIGG - PHOTOCOPIES 


NE 


10.74- 




TOTAL = 76.10- 






Figure 2. Sample Printout — Complete File and Selected Accounts 



WINNIPEG MICRO - 80 USERS GROUP 
STATEMENT OF RECEIPTS AND DISBURSEMENTS 
FOR THE PERIOD FROM JANUARY 1 , 1983 TO FEBRUARY 28 » 


1983 


RECEIPTS 

ANNUAL MEMBERSHIP FEES 


160.00 


BANK INTEREST 


1.50 


TOTAL RECEIPTS 


161.50 


DISBURSEMENTS 

RENT 50.00 

NEWSLETTER 76.10 

TOTAL DISBURSEMENTS 


126. 10 


EXCESS OF RECEIPTS OVER DISBURSEMENTS 


35.40 


Figure 3 . Sample Printout — Financial Statements Table. 
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merits, as shown in the sample run (see 
Figure 3). 

The dates you enter are used only for 
the heading. The statement will take into 
account every transaction in the file. The 
program will not test to ensure that a 
transaction's date is within the dates you 
specified. 

• Change Account Codes — This rou- 
tine lets you change the organization 
name, change the number of revenue 
accounts, and change, or add to, the list 
of account names. 

If you already have some data on file, 
be careful when changing the number of 
revenue accounts. Make sure you don't 
change a presently-existing revenue ac- 
count into an expenditure account, or 
vice-versa. 

I also wouldn't recommend changing 
the abbreviation for an account if you 
have already entered transactions charged 
to that account. 

If you have a printer, you can obtain a 
printout of your account codes. 

• Sort into Date Order — This routine 
sorts your transactions by date, putting 
the earliest date first. 

• Save Data to Disk — The only un- 
usual thing in this routine is that you can 



save a back-up copy of your data under 
a different file name on the same disk. 
CASHBOOK does this by temporarily 
changing the last character of your data 
file name to a B and then re-saving the 
data. For example, if your data file name 
is "CLUBCASH/DTA," your data will be 
saved once under that file name and 
then again under "CLUBCASH/DTB." 

If, on a subsequent run, you find that 
"CLUBCASH/DTA'' won't load for some 
reason, run the program again and speci- 
fy "CLUBCASH/DTB" as the data file 
name. After the data has loaded and 
you're at the menu, press Break and 
Enter: fs$ = "clubcash/dta" : goto ioo. 
You've now recovered your data and can 
proceed. 

• Description Search — This is a sim- 
ple in-string search of each transaction 
description on file. Specify the string to 
be searched for and CASHBOOK will 
print the details of every transaction 
which contains that string within its de- 
scription. 

• Test for Errors — Since CASHBOOK 
lets you change your account code 
names even after you've entered some 
transactions, there is a danger that you 
may end up with transactions charged to 
accounts which no longer exist. These 



transactions would show up on a listing 
of the complete file, but would be left 
out of the Statement of Receipts and Dis- 
bursements. Also, if the account code is 
no longer valid, you would not be able to 
obtain a list of just the transactions 
charged to that account. 

The test for errors first checks to see 
that all transactions are charged to a 
valid account code. If it finds any errors 
they must be corrected. 

You will also be told of any revenue 
transactions with negative amounts and 
any expenditure transactions with posi- 
tive amounts. These are not necessarily 
errors, but they are unusual enough to 
be pointed out. 

Closing Comments 

Very important — remember to save 
your data before exiting from the pro- 
gram! 

If the coding of the Save Data routine 
looks a little strange, that's because 
CASHBOOK was originally written for a 
Model 1 . 1 found the same disk I/O cod- 
ing worked on the Color Computer, so I 
decided to leave it alone. 

Many thanks to Mel Seder for his help 
modifying this program to work on the 
Color Computer, and testing and en- 
hancing the program. ■ ■ ■ 




UNLIMITED EXPANSION 



This is the C-C Bus, 

just one of a full line of accessories for ' 
your computer. Write or call for our catalog 
— it will tell you about: the capabilities 
of the C-C BUS; our WORD-PAK, 80 
column video board that is compatible with 
Flex, OS-9, CP/M or just Basic; our P-C 
PAK, parallel printer and real time clock 
interface; the MEM-PAK, Proto CoCo, and 
the new items we have planned for ’84. 

We are your one source for all your 
expansion needs. 



isic. 

P.0. BOX 813 
N. Bergen, N.J. 07047 

(201)330-1898 
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Program Listing. Cashbook 


0 GOTO 26000 ' CASHBOOK/CC 


140 PRINT" < S > SORT INTO DAT 


2 CLS :PRINT@96 , "INITIALIZING" 


E ORDER < I > CHANGE ACCOUN 


10 GOTO25010 


T CODES": PRINT 


60 PRINT "PRESS ANY KEY" 


150 PRINT" < D > DESCRIPTION S 


61 IFINKEY$=" "THEN61 ELSERETURN 


EARCH < T > TEST FOR ERRO 


65 PRINT#-2 ,STRING$ ( H/2-LEN( H$ ) / 


RS " 


2 ,32 )H$ : RETURN 


200 Ml$ = INKEY$ : IFMl$=" "THEN 200 


90 PRINT USINGFl$;Bl$(L) ,B2$(L) , 


210 CLS : ON INSTR( "AVHC&FISDT" ,M1 


B3$ (L) ,B4(L) : RETURN 


$)GOTOl010 ,5010 ,5010 ,2010 ,4010 ,6 


95 PRINT"DATE : "Bl$ ( L) : PRINT "DE 


010 ,7010 ,8010 ,9010 ,10010 


SCRIPTION : "B2$ ( L) : PRINT" ACCOUN 


220 GOTOIOO 


T CODE : "B3$ (L) : PRINT" AMOUNT : 


1000 REM add data to file 


" ; : PRINTUSING"##### . ##-" ;B4(L) :R 


1010 FORL=CC+lTOC+l : CLS : IF ( L=C+1 


ETURN 


) THEN PRINT"SORRY - I CAN'T HOLD 


99 INPUT"PRESS <ENTER> FOR MENU" 


ANY MORE": GOTO 9 9 


;x$ 


1020 PRINT" ENTER DATE ( YYMMDD ) " 


100 T=0 : Y=0 : Y2=0 : T$= INKEY$ 


1030 INPUT" (DEFAULT IS MENU)";Bl 


105 CLS : PRINT 


$ ( L ) 


110 PRINT" < A > ADD TO DATA O 


1040 IFBl$ ( L)=" " THEN100 


N FILE < C > CORRECT ENTRI 


1050 IFBl$ ( L) =" S "THENBl$ ( L ) =Bl$ ( 


ES" : PRINT 


L-l ) 


120 PRINT" < V > DISPLAY FILE 


1060 IF LEN ( Bl$ ( L ) ) <> 6THENBl$ ( L ) 


ON VIDEO < H > HARD COPY OF 


=" " : GOTO10 20 


FILE" : PRINT 


1070 INPUT"DESCRIPTION " ; B2$ ( L ) 


130 PRINT" < & > SAVE DATA TO 


1080 IFB2$ (L)="S"THENB2$ (L)=B2$ ( 


DISK < F > FINANCIAL STA 


L-l) 


TEMENTS" : PRINT 


1090 GOSUB15010 : B3$ (L)=SA$(L1) 




STYLOGRAPH 2.0 

The user Friendly" word processing 
.system. Fewer key strokes by the 
- operator make it easier to learn. 

— =z COLOR OS9 OR 

COLOR FLEX ONLY $149.95 



SPELLING CHECKER 

Checks all words against an Internal user- 
expandable dictionary of over 42,000 
words. 

COLOR OS9 OR COLOR FLEX $95.00 




MAIL MERGE! 



inserts names and addresses Into form let- 
ters and mailing lists. Appends files at print 
out time. Handles files longer than memory . 

COLOR OS9 OR COLOR FLEX $75.00 




Inquire about our other software 7 / 

• Business Programs • G/L, A/R, A/P 

• Data Base Management System 

• Assemblers / 

Also, Daisy Wheel Printers $599 



X ^7 

Great Plains Computer Company Inc. 
\ p.o. Box 916 

N Idaho Falls, Idaho 85401' 

(208) 529-3210 



Flex and Uniflex are trademarks of Technical Systems Consultants, Inc. 
/ 0S9 is a trademark of Microware. \ 



S Enter 20 on TeleResponse page 159 



Color Computer/35 



1100 INPUT " AMOUNT ";B4(L) 

1110 IFL1>C2 THEN B 4 ( L ) = -B4(L) 
1120 PRINT: PRINT" ITEM IS RECORDE 
D AS s" 

1130 GOSUB95 : PRINT 

1140 CC=L: INPUT "PRESS ENTER TO C 

ONTINUE" ;T$ 

1150 NEXTL 

2000 REM correct data 
2010 PRINT" ENTER DATE OF TRANSAC 
TION" :PRINT"TO BE CORRECTED ( YYM 
MDD ) " : INPUTT $ 

2020 FORL=lTOCC 

2030 IFBl$ ( L) <>T$THEN2120 

2040 PRINT : GOSUB95 

2050 PRINT: INPUT"THIS ONE (Y/N)" 

; X$ : IFX$<> " Y"THEN2120 

2060 PRINT: PRINT" JUST PRESS <ENT 

ER> FOR THE ITEMSTHAT ARE O.K." 



2070 PRINT: PRINT "CORRECTED DATE" 
: INPUTT$ : IFT$<> " " THENBl$ ( L ) =T$ 
2080 PRINT : PRINT"CORRECTED DESCR 
IPTION " : INPUTT$ : IFT$<> " "THENB2$ ( 
L)=T$ 

2090 CLS : PRINT "ENTER CLASSIFICAT 
ION NUMBER" :GOSUB15010 : IFL1>0AND 
LKCl + lTHENB 3$ ( L ) =S A$ ( Ll ) 

2100 PRINT : PRINT"CORRECTED AMOUN 
T" : PRINT" (ENTER EXPENSES AS":P 
RINT" A NEGATIVE AMOUNT )": INPUT 
T : IFTO 0THENB4 ( L ) =T 
2110 PRINT: PRINT" ENTRY NOW READS 
: " :GOSUB95 : PRINT :G0T099 
2120 NEXTL :G0T099 
3000 REM load data from disk 
3010 PRINT" LOADING FILE: "FS$ 
3020 OPEN " I " , 1 ,FS$ : INPUT#1 ,C1 ,C2 
,CC,N$ 

3030 DIMSA$(Cl) ,AC$(C1) ,T(Cl) 
3040 FORL=lTOCC : INPUT#1 , Bl$ ( L ) , B 
2$ (L) ,B3$ (L) ,B4(L) : NEXTL 
3050 FORL=lTOCl : INPUT#1 , SA$ ( L) , A 
C$(L) : NEXTL: CLOSE :GOTO100 
4000 REM save data to disk 
4010 FT$=FS $ 

4020 PRINT" YOU ARE IN THE *SAVE 
* ROUTINE. PREVIOUS DATA UNDER 
FILENAME : "FT$" WILL BE LOST": 

PRINT" AND REPLACED WITH THE DAT 
A NOW IN MEMORY" : PRINT 

4030 INPUT" ENTER <S> TO CONTI 
NUE" ; T$ : IFT$<> "S "THEN100 
4040 OPEN "O" , 1 ,FT$ : PRINT" DAT A FI 
LE NAME IS " : PRINTFT$ 



40 50 PRINT# 1 , Cl , C 2 ; CC ; FC $ ? N $ ; FC $ 
; : FORL=lTOCC 

4060 PRINT#1 ,Bl$ ( L) ;",";B2$(L) 

, " ; B 3 $ ( L ) ;",";B4(L) ;: NEXTL 
4070 FORL=lTOCl : PRINT#1 ,SA$ ( L) ;" 
, " ; FC $ ; AC $ ( L ) ; FC : NEXTL 

4080 CLOSE : IF RIGHT$ ( FT$ , 1 ) <> "B" 
THEN INPUT" ENTER <B> FOR A BACK 
UP COPY" ;X$ : IFX$="B"THENFT$= LEF 
T$ ( FS $ ,LEN ( FS $ ) —1 ) +" B" :PRINT"BAC 
KUP " ;:GOTO4040 
4090 GOTO100 

5000 REM video/printer display 
5010 IFMl$="H"THEN PRINT" PREPAR 
E PRINTER" : INPUT" HOW MANY TRANS 
ACTIONS PER PAGE? (DEFAULT IS 50 
)" ;Yl:PRINT#-2," ":PRINT#-2," ": 
PRINT#-2 , " " : H$=N$ : GOSUB65 : IFYl= 
0THENYl=50 
5020 GOSUB15010 

5030 PRINT" ACCOUNT NUMBER ?" :PR 
INT" (DEFAULT IS COMPLETE FILE)" 
: INPUTQ$ 

5040 CLS : IFQ$=" "THENHP$=" COMPLE'T 
E FILE" :GOTO5080 
5050 Q= VAL ( Q$ ) 

5060 IF Q<10RQ>C1 THEN5020 
5070 HP$=AC$(Q) :Q$=SA$(Q) 

50 80 IFMl$ =" H "THENH$=HP$ : GOSUB65 
: PRINT# -2 , " " 

5090 FORL=lTOCC : IFQ$=" "THEN5110 
5100 IFB3$ (L) <>Q$THEN5170 
5110 T=T+B4(L) 

5120 Y=Y+1 : IFM1$ =" V" AND Y=13 THE 
NY =0 : GOSUB60 
5130 GOSUB90 
5140 IFMl$<> "H" THEN 51 70 
5150 IFY =Yl THENY=0 : INPUT"ADVANC 
E PAPER AND PRESS ENTER X$ : PRIN 
T#- 2 , " " : PRINT#-2 , " ":PRINT#-2," 
" : H$=HP$+" (CONT. )" :GOSUB65 : 

PRINT#-2 , " " :Y2=0 

5160 PRINT#- 2 ,USINGF4$ ;Bl$ ( L) ,B2 

$ (L) ,B3$ (L) ,B4(L) :Y2=Y2+1 

5165 IFY2=5THENPRINT#- 2 , " " :Y2=0 

5170 NEXTL 

5180 PRINT :PRINTUSINGF7$ ;T: IFMl$ 
=" H "THEN PRINT#-2 , " ":PRINT#-2,T 
AB( 30 )" " ; :PRINT#-2 ,USINGF7$ ;T 
5190 GOTO 9 9 

6000 REM print finan. statement 
6010 PRINT" > PREPARE PRINTER < 
" : PRINT 

♦ more 
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6020 TR=0:TE=0:FORL1=1TOC1:T(L1) 
=0 : NEXT 

6030 PRINT” FINANCIAL STATEMENTS 
FOR THE PERIOD FROM 

6040 LINEINPUTFA$ : LINEINPUT" TO 
..." ; FB$ 

6050 PRINT# -2 , " ":PRINT#-2," ":P 
RINT#-2 , " " 

6060 H$=N$ : GOSUB6540 : GOSUB6500 : G 
OSUB6510 : PRINT# -2 , " " : PRINT#-2 , " 
" :GOSUB6520 : PRINT#-2 , " " 

6070 PRINT, "CALCULATING" :F0RL=1T 
OCC : FORLl=lTOCl 

6080 IFB3$ ( L )=SA$ ( Ll ) THENT ( Ll ) =T 
( Ll ) +B4 ( L ) ELSE NEXTLl 
6090 NEXTL 

6100 FORLl=lTOC2 : TR=TR+T( Ll ) 

6110 IFT( Ll) <>0THENPRINT#-2 ,USIN 
GF3$ ; AC§ ( Ll ) ,T( Ll ) :PRINT#-2," " 
6120 NEXTLl 

6130 TR$= STR$ ( INT ( TR ) ) : Tl= LEN ( 
TR$ ) +2 : PRINT#- 2 , " " : PRINT#-2 , " " 

: PRINT#- 2 ,STRING$ ( 72-Tl , " " ) STRI 
NG$ ( Tl , ) : T$= STRING$ (18,32) +" 
TOTAL "+R1$ : PRINT#-2 ,USINGF3$ ;T$ 
,TR 

6140 PR INT# -2 , " " :PRINT#-2 ," ":P 
RINT#-2 , " " : PRINT#-2 , " " 

6150 GOSUB6530 : PRINT#-2 , " ":PRIN 
T, "CALCULATING" 

6160 FORLl=C2+lTOCl : TE=TE+T( Ll ) 
6170 IFT( Ll ) <>0THENPRINT#-2 ,USIN 
GF5$ ; AC$ ( Ll ) , -T ( Ll ) :PRINT#-2," " 

6180 NEXTLl 

6190 PRINT#-2 , " " : PRINT#-2 , " ":T 
$= STRING$ (16,32)+" TOTAL "+R2$:P 
RINT#-2 ,USINGF3$ ;T$ ,-TE 
6200 PRINT#- 2 , " ":PRINT#-2," " :P 
RINT#-2,STRING$( 72-Tl," ") STRING 
$ ( T 1 , " — " ) 

6210 T$=" EXCESS OF "+Rl$+" OVER 
" +R2$ 

6220 PR INT#- 2 ,USINGF3$ ; T$ ,TR+TE 
6230 PRINT#-2,STRING$( 72-Tl," " ) 
STRING$(Tl,"=" ) 

6240 GOTO 9 9 

6500 H$=" STATEMENT OF "+Rl$+" AN 
D "+R2$ :GOTO6540 

6510 H$=" FOR THE PERIOD FROM "+F 
A$+" TO "+FB$ : GOTO6540 



6520 H$=R1$ :GOTO6540 
6530 H$=R2$ 

6540 GOSUB65 : RETURN 
7000 REM init/change acct codes 
7010 PRINT" ORGANIZATION NAME IS 
: " : PRINT" "N$: PRINT" ENTER NEW 
NAME": PRINT" IF YOU WANT TO CHAN 
GE THIS . . . " :LINEINPUTT$ : IFT$<>" 

" THENN $=T$ 

7020 PRINT: PRINT: PRINT" YOU PRES 
ENTLY HAVE"C2: PRINT" REVENUE ACC 
OUNTS" : INPUT" ENTER NEW NUMBER T 
O CHANGE THIS" ;T: IFTO0THENC2=T 

7030 CLS : PRINT"RECEIPTS " :Y=0: FOR 
Ll=lTOCl 

7040 PRINTUS INGF6$ ;Ll,SA$(Ll) ,AC 
$ (Ll) 

7050 IFL1=C2THEN PRINT" EXPENDIT 
URES " : Y=Y+1 

7060 Y=Y+1:IFY=13THENY=0: INPUT" 
PRESS ENTER TO CONTINUE" ?X$ 

7070 NEXT 

7080 PRINT" ENTER ACCOUNT NUMBER 
" : INPUTLl : IFLl=0THEN7500 
7085 IF Ll>Cl THEN7030 

7090 PRINT" THIS NOW READS 
7100 PRINT USINGF6$ ; Ll , SA$ ( Ll ) ,A 
C$ ( Ll ) 

7110 PRINT" ENTER NEW 2-CHARACTE 
R CODE" : INPUTS A$(Ll) 

7120 PRINT" NEW LONG DESCRIPTION 
. . . " : LINE IN PUT AC $ ( Ll ) 

7130 GOTO7030 

7500 PRINT" ENTER <Y> IF YOU WAN 
T A HARD COPY OF YOUR ACCOUNT 
CODES " 

7510 INPUTX$ : IFX$<> " Y"THEN10 0 
7520 INPUT" PREPARE PRINTER & PR 
ESS ENTER " ;X$ 

7530 PRINT#- 2 , " ":PRINT#-2," " :P 
RINT#-2 , " " :H$=N$:GOSUB65 

7540 H$=" ACCOUNT CODES ": GOSUB 65 : 
PRINT#-2 , " " 

7550 PRINT#-2 , " RECEIPTS" :FO 

RL=lTOCl : PRINT#-2 , " ";: PRINT 

#-2 ,USINGF6$ ; L, SA$ ( L ) ,AC$(L) 

7560 Y=Y+1: IFY=3THENY=0:PRINT#-2 

II II 

r 

7570 IFL=C2 THENPRINT#-2 , " ":PRI 
NT#- 2 , " EXPENDITURES" :Y=0 

7580 NEXTL :GOTOl00 

+ more 



Color Computer/37 




8000 REM sort by date 
8010 LF=0 : FORL=lTOCC-l 
8020 IFBl$ ( L) >Bl$ ( L+l )THENTl?=Bl 
$ (L) :T2?=B2? (L) :T3$=B3$ ( L) :T=B4( 
L) :Bl? (L)=Bl? (L+l) : B2$ ( L ) =B2$ ( L+ 
1 ) :B3$ (L)=B3$ (L+l) : B4 ( L)=B4 ( L+l ) 
: Bl$ ( L+l )=T1$ : B2$ ( L+l )=T2$ : B3$ ( L 
+1 )=T3? : B4 ( L+l )=T: LF=1 
8030 NEXTL: IFLF=1THEN8010 
8040 GOTOIOO 

9000 REM search for description 
9010 PRINT" ENTER FULL/PARTIAL D 
ESCRIPTION" : INPUTS? 

9020 FORL=lTOCC 

9030 IF INSTR(B2$(L) ,S?)>0 THENG 
OSUB90 :T=T+B4(L) : Y=Y+1 : IFY=13THE 
NY=0: INPUTT? 

9040 NEXT : PRINTUSINGF7? ;T:G0T099 

10000 REM test for errors 
10010 PRINT" TESTING FOR ERRORS" 
: FORL=lTO CC 

10020 IFB3? ( L)=" "THEN10060 
10030 FORLl=lTO Cl 
10040 IFB3? (L)=SA? (LDTHEN10080 
10050 NEXTL 1 

10060 PRINT "ACCT. CODE DOES NOT 
MATCH ANY OFYOUR CHOSEN CODES." 
10070 GOSUBlO 500 : IFX?=" ! "THEN100 
ELSE10100 

10080 IFLl >C2 AND B4(L)>0 THEN PR 
INT" ITEM"L" IS AN EXPENDITURE" :P 
RINT"BUT THE AMOUNT IS POSITIVE" 
: GOSUB10500 : IFX?=" ! "THEN100 
10090 IFL1<=C2 AND B4(L)<0 THENP 
RINT" ITEM"L" IS A REVENUE ITEM": 
PRINT"BUT THE AMOUNT IS NEGATIVE 
" :GOSUB10500: IFX?=" ! "THEN 100 
10100 NEXTL :G0T099 
10500 GOSUB90: PRINT" PRESS <ENTE 
R> TO CONTINUE" : PRINT" "FC?"!"FC 
?" FOR MENU" 

10510 INPUTX? : RETURN 
15000 REM get acct code no. 

15010 Y=0 : PRINT " RECEIPTS" 

15020 FORLl=lTO Cl 
15030 IFSA? ( Ll ) = " " THEN150 50 
15040 PRINTUSINGF6? ;Ll ,"" ,AC?(L1 
) : Y=Y+1 : IFY>11THENY=0 : INPUT " PRE 
SS <ENTER>" ;X? : IFVAL ( X? ) >0THENLl 
=VAL ( X? ) : GOTO15080 
15050 IFLl=C2 THEN PRINT" EXPEND 
ITURES" : Y=Y+1 

15060 NEXTL 1 : IFMl?=" V" ORMl?="H"T 
HEN15130 

15070 INPUT" NUMBER" ;Ll 



15080 IF Ll>Cl THEN15010 
15090 IFLK1THEN15120 
15100 IFSA? ( Ll )=" "THEN15120 
15110 GOTO15130 

15120 IFMl? =" A"THEN PRINT ," INVAL 

ID ACCOUNT" :GOTO15010 

15130 Y=0: RETURN 

25000 REM initialization 

25010 CLEAR8000 : C=500 

25020 DIML ,Y,Bl?(C) , B2? ( C ) ,B3?(C 

) , B4 ( C ) 

25040 Fl?=" %"+STRING?( 4,32 )+"%" + 
STRING? (1,32)+" %"+STRING? ( 10 , 32 ) 
+" %"+STRING? ( 1, 32 )+"%%##### .##-" 

25050 F3?=STRING? (8,32)+" %"+STRI 
NG? ( 44 , 32 ) +" %"+STRING? (9,32)+"## 
####.##- 

25060 F4?=STRING? (8,32) +" %"+STRI 
NG? (4,32)+" %"+STRING? (5,32)+" %"+ 
STRING? (37,32) +" %"+STRING? (3,32) 
+" %"+STRING? (1,32)+" %" +STRING? ( 3 
,32)+"######.##-" 

25070 F5?=STRING? ( 8 , 32 )+" %"+STRI 
NG? ( 34 , 32 ) +" %"+STRING? (3,32)+"## 

25080 F6?=" ## "+STRING? ( 2 , 32 )+" %" 
+STRING? (1,32)+" %" +STRING? (2,32) 
+" %"+STRING? (19,32) +" %" 

25090 F7?=STRING? (12,32)+" TOTAL 
= #####.##-" 

25100 FC?= CHR? ( 34 ) 

25110 H=80 : Rl?=" RECEIPTS" :R2?="D 
ISBURSEMENTS" 

25120 DIR 

25130 PRINT : PRINT : PRINT " ENTER D 
ATA FILE NAME" : INPUTFS?: IFFS?="" 
THEN25120 

25140 PRINT: PRINT" IS THIS YOUR 
INITIAL RUN (Y/N)" : INPUTX ?:CLS: I 
FX ?<> " Y"THEN 3010 

25150 PRINT" THE FIRST STEP IS T 
O ESTABLISH YOUR ACCOUNT CODES. 
": PRINT: PRINT" HOW MANY ACCOUNT 
CODES" : PRINT" (TOTAL OF REVENUE 
AND" : PRINT" EXPENDITURE CODES) D 
O YOU WANT?" : PRINT" *-NOTE-: YOU 
WILL NOT BE ABLE TO CHANGE T 

HIS NUMBER LATER" 

25160 INPUTC1 : DIMSA? ( Cl ) ,AC?(Cl) 
,T (Cl ) 

25170 PRINT" ENTER THE NAME OF": 
PRINT" THE ORGANIZATION" :LINEINP 
UTN ? : GOTO70 20 

260 00 PCLEAR l:GOT01 ■■■ 
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The OS-9 experts have ] 

developed something new. j 



C Compiler Version 2 for color computer 
OS-9 DOS for color computer 
Relocatable Assembler for Flex and CoCo DOS 



C Compiler 

Dugger’s Growing Systems C is the original C Compiler 
for the 6809 and is the proven leader in the field. It is a grow- 
ing subset of the C programming language. It runs in 20K, 
has assembly language output, position independent code, 
an extensive library in assembly language source, and code 
optimizer. 

The Color Computer and Flex (which will run on the 
Color Computer) are now both available with full floating 
point package (float, long, for, goto, etc.) in addition to 
the basic C commands. CoCo Dos also contains features 
which use the BASIC ROM functions (els, polcat, partial 
floating point, etc.). 

Dugger’s Growing Systems has the cost effective C 
for OS-9. It contains all the necessary C commands (while, 
if, if else, int. , char, etc.) which may be linked, loaded, 
and used in a multi-user, multi-tasking environment. 

Relocatable Assembler 

The relocatable assembler package includes assembler, 
linker, and manager. May be used with the Color Computer 
or Flex. 

Symbols up to 32 characters □ Many special characters 
allowed in symbols ($, %, etc.) □ Multiple files assembled 
without exiting the assembler □ Direct output to printer at 
any time □ Generates either absolute or relocatable mod- 
ules which are linked together with RLINK to generate exe- 
cutables □ Supports two types of global variables (VAR and 
COMN) Fortran type common □ Compatible with source 
for most assemblers □ Macros with parameters □ Condi- 
tional assembly. 



Linker 

Use text-like files which are generated by RASMB or any 
other source □ Allows inclusion of multiple source files, 
each of which can have any number of program modules 
□ Provide for library files, whose modules are included 
only as required □ Specify at link-time execution address 
and global storage area for easy generation of ROM -able 
code □ Will link together both absolute and relocatable 
modules □ Extensive linkage information output on request. 



Manager 




Provide a tool to build a “library” of re- 
locatables □ Edit feature to list, insert, 
and delete modules. 



Check and Compare Prices 

CoCo C Compiler Version 2.3 
(requires disk assembler and text editor) . . . .49.95 
Relocatable Assembler (package: assembler, linker, 
and manager) RASMB CoCo Version 1.7 49.95 

Flex C Compiler Version 2.3 75.00 

Relocatable Assembler (package: assembler, linker, 
and manager) RASMB Flex Version 1.7 75.00 

OS-9 C Compiler Version 1.2 59.95 

C Programming Language, Kernighan and Ritchie 19.95 

Shipping add $3.00 

C.O.D. add $3.00, foreign handling 15% 

California residents add 6% 

MasterCard and Visa accepted. (619) 755-4373 
. Dealer inquiries invited. 

i 1 



DUGGER’S GROUJinG SI JVSTEmj 



Post Office Box 305, Solana Beach, California 92075 (619) 755-4373 , 



*OS-9 is a trademark of Microware, Inc. t FLEX is a trademark of Technical Systems Consultants, Inc. 
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More Summer Project Winners 



1 6K Extended Color Basic 




f 

% 






Spazmorg is the grand prize winner in The Basic category of The Summer Program- 
ming Project. It's a graphic real-time game and requires logic. It requires 16K Extended 
Basic, and won't operate with the disk controller plugged into the computer. 

The game has three versions, and uses the right joystick in play. You play against the 
clock and against the giant spider and the Spazmorg that dwell in the castle in which 
you find yourself. You are trying to trap the baby Spazmorg — the joystick fire button 
lets you open doors as you pass from room to room in pursuit of the baby. Complete 
instructions and demonstrations are presented before the game, and should be read and 
considered before playing. 

Enter the program, save it to cassette, and run the game. Menu prompts guide the user 
through the directions and into play. 

Good luck, and have fun! 



Program Instructions. Spazmorg 



0 'SPAZMORG INSTRUCTION PROGRAM 

3 CLS4 : PLAY"V5 " : A$=CHR$ ( 191 ) +CHR 
$ ( 175 ) +CHR$ ( 191 ) +CHR$ ( 175 ) +CHR$ ( 
191 ) +CHR$ ( 175 ) : B$=CHR$ ( 191 ) +CHR$ 
(175)+CHR$(175) +CHR$ ( 175 ) :C$=CHR 
$ ( 191 ) +CHR$ ( 175 ) 

4 F0RX=161T0185 

5 PRINT@X f C$ ; : PRINT0X+4 , C$ ; jPRIN 
T@X+32, A$; : PRINT@X+64 ,CHR$ ( 143 ) + 
CHR$ ( 191 ) +C$ ; : PRINT@X+97 ,B$ ; :PRI 
NT@X+128,A$; 

6 PLAY n V+L9001ABC" :NEXTX 

8 PRINT@228, "***** SPAZMORG **** 
*" ; 

9 PLAY" L55V20O1ABCDEFGFEDCBAO2AB 
CDEFGFEDCBA03ABCDEFGFDECBA04ABCD 
EFGFEDCBAV25ABCDGDGDGD03DGDGDG02 
DGDGDG01DGDGDGEDAEDAEDA02EDAEDA0 
3EDAEDA04EDAEDAV2 2EDAEDAV20EDAED 
AV18EDAEDAEDAV16EDAEDAEDAV15EDAE 
DAEDAV12EDAEDAEDAV10EDAEDAV8EDAE 
DAV6EDAEDAV4EDAEDAV3EDAA 

10 PRINT@234 f "spazmorg *****"; 



12 



11 PLAY"V30 " 

12 PLAY"V-L55CBA01 " 

13 C=C+1 j IFC<25 THEN 

15 FORX=lTO100 :NEXTX 

16 CLS :PRINT@420/" 

UMBER 

17 FORX = lTO30:PRINT<ax,CHR$(140) : 
NEXTX 



PICK ONE N 



18 

19 

20 
21 
22 
23 

n 



PRINT@42, "** 
PRINT@104, "1 
PRINT@136 , " 2 , 
PRINTQ168 / " 3 , 
PRINT@200 , " 4 , 
PRINT@232 / "5 



MENU **" 

GENERAL" 

ROOMS" 

YOU" 

BABY SPAZMORG" 
MOTHER SPAZMORG 

SPIDER" 

WINDS" 

NO JOYSTICKS?" 
VERSIONS" 

CLOAD" 



24 PRINT0264, "6 . 

25 PRINT@296,"7. 

26 PRINTQ328 , "8 . 

27 PRINT@360 , " 9 . 

28 PRINT0392, "C. 

29 F0RX=449T0478 :PRINT@X,CHR$ (13; 
1) : NEXTX 

30 Q$=INKEY$ 

31 IF (Q$<"l"ORQ$>"9" ) ANDQ$<>"C" 

I more 
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PRICKLY-PEAR SOFTWARE 

QUALITY PROGRAMS FOR YOUR COCO & TDP-100 

PROGRAMS REQUIRE 16K EXTENDED BASIC FOR TAPE, AND 32K DISK UNLESS OTHERWISE NOTED. 



FOUR GREAT NEW PROGRAMS 



Varalyzer 

A breakthrough in programming utilitiesfrom theauthorof 
Colorkit! You may need a little background for this pro- 
gram. The first time you mention a variable in a BASIC 
program, the computer assigns a space in the variable 
table in memory. It starts at the bottom of the table and 
works up to the top, and the next time that variable is called 
in your program the computer goes to the variable table to 
look it up. The search starts at the bottom of the table and 
continues until the variable is located. This takes time, and 
the farther up the table the variable is located, the longer it 
takes. There is a BIG SPEED ADVANTAGE in having the 
most frequently called variable located first in the table, 
with the next most frequently called variable second, etc. 
This program simply examines your BASIC program while 
it is running and then actually modifies it to speed it up! 
Speed increase will be from 5% to 75%, depending upon 
the program, and we include a list of othertips to speed up 
execution even more. This program will also print a list of 
the variables used in the program and tell you how many 
times each is called. VARALYZER is 100% machine 
language and REQUIRES 64K to run. Works fine on either 
disk or tape systems. $24.95 



Clone Master 

This is the ultimate disk backup utility, and who else but 
Prickly-Pear, originators of Omni-Clone, could bring it to 
you. If you are tired of waiting for your BACKUP command 
to finish, you’ll like the speed of CLONE MASTER. This 
program checks the computer memory size, and if you 
have a 64K machine it will do a backup on a full disk in 
about 7 minutes — including formatting the destination 
disk — with only THREE swaps, not the seven you are used 
to, and if you are running multiple drives, CLONE MASTER 
will handle up to 4 double-sided drives. In addition, al- 
though we can’tguaranteethatCLONE MASTER will back 
up any disk, it can handle backups of any non-standard 
(protected) disk we have seen — not only on the Color 
Computer, but on Model III and IV, IBM PC, Kaypro, 
Osborne, and Atari. It handles up to 256 tracks, single and 
double density — even on the same track, CRC errors, and 
lots more. It even checks the speed of your drives for you! If 
you are using a disk drive, you know how disks will crash, 
so don’t leave your valuable software unprotected any 
longer. Back it up or lose it! CLONE MASTER will adjust to 
any memory size and works with any version of the ROM’s 
— including the JVC controller. $39.95 




Erland 



The most complex 
simulation we I 
ever seen, and 
you VIKING! fans 
will want to take 
note. This game 
has you running 
a small holding 

in old Ireland. You must manage your land, 
sheep, army, markets, fishing fleets, taxes, 
many other factors while you try to rise in rank to become 
King or Queen. You may attack — or be attacked — by the 
other players, and you will have to face the fact that there 
isn’t enough land to go around, and you may have to take 
some away from someone else! This 32K game is con- 
siderably more complex and difficult than our super 
popular VIKING! Because of this, we have added a save- 
the-game feature. ERLAND is for 2 to 5 game lovers, and 
will warm the heart of anyone who liked VIKING!, Monopoly, 
or other classic strategy games. This game is a hybrid of 
Extended Basic and Machine language. The diskand tape 
versions are not interchangable. Tape — $24.95; Disk — 
$29.95 





Satellite Tracker 



Satellite 

Tracker., 







If you are interested in reception of transmissions from the 
television satellites, you will need this program. It does all 
calculations associated with planning and setting up a 
satellite dish antenna. It figures antenna gain, signal to 
noise, aiming point for any geosyncronous satellite, effect 
of various quality amplifiers, and a lot more. The program 
will tell you whethera dish is practical in your location, how 
big it needs to be, and what kind of picture quality and 
signal strength you will achieve. If you are thinking of 
investing in a system, don’t make a move until the results 
are in. Requires 32K extended BASIC and some (limited) 
knowledge of satellite terms and language. $79.95 



Dealer and author inquiries are always welcome. 
Canadian dealers should contact Kelly Software 
Distributors, Ltd., P. O. Box 1 1 932, Edmonton, Alberta 
T5J-3L1 (403) 421-8003 



Your personal check is welcome - no delay. Include 
$1.50 shipping for each program ordered. (Shipping free 
on $50.00 or larger orders). AZ residents add 7% sales 
tax. Orders shipped within two days. 



Stocked by Quality Dealers, or 

Send Order To: PRICKLY-PEAR SOFTWARE 

9234 E. 30th Street 
Tucson, Arizona 85710 
(602) 886-1505 






THEN 30 

33 PLAY"V5" :F0RX=1T025:PLAY"V+L2 
5501A" :PRINT:NEXTX 

34 IFQ$="C"THEN145 

35 Q=VAL ( Q$ ) : ON Q 001036,73,94,1 
02,111,120,126,135,138 

36 CLS8 :PRINT@134," WELCOME TO S 
PAZMORG "? 

37 PLAY"V25L1605ABCDGGGGGGFEDBCB 
CBDGEFFFFFEDCACACDEFDEEEEDFDGFDA 
BCDDDDCBABCCCBABCACBCACBACBACBAC 
BBBB 

38 PRINT® 2 3 2, " ENJOY YOUR STAY " 
; : FORX=lTO800 : NEXTX 

40 CLS : PRINT" WITHIN THE DEPTH 
S OF CRAGMORETOWER THERE DWELLS 
THE SPAZMORG .HE'S A MAGICAL CREA 
TURE FROM THEUNDERWORLD . ONCE EV 
ERY THOUSAND" 

44 PRINT" YEARS IT HAS OFFSPRING. 
"," A YOUNG SPAZMORG IS A HARMLE 

55 LITTLE CREATURE WHOSE ONLY TY 
PE OF DEFENSE IS TO RUN AWAY. TH 
E MATURE SPAZMORG IS A VICIOUS 
CARNIVORE WHO FEEDS ON HUMANS." 
50 PRINT" YOU MUST CAPTURE THE YO 
UNG" , "SPAZMORG WHILE IT'S MOTHER 

IS AWAY. IF YOU TAKE TOO LONG 
, SHE MAY RETURN. " :GOSUB70 

56 CLSO : PRINT , , " ALSO, IF YOU 
ARE NOT CAREFUL YOU MAY BE DEVOU 
RED BY THE", "GIANT SPIDER THAT D 
WELLS IN THE GREEN ROOM OF THE T 
OWER."," BEWARE !!!!!!!": PRINT 

61 GOSUB70 

62 CLS sPRINT,," THE TOWER ROOM 
S ARE DESIGNED SO THAT EACH TIME 

YOU PASS" , "THROUGH A DOORWAY, T 
HE DOOR", "LOCKS BEHIND YOU. TO R 
EOPEN all" 

63 PRINT"THE DOORS IN THE TOWER 
YOU MAY PRESS THE JOYSTICK BUTT 
ON OR", "THE SPACE BAR ON THE KEY 
BOARD. YOUR STRATEGY SHOULD BE 
TO TRAP THE BABY SPAZMORG IN ONE 

OF THE ROOMS WITH ALL THE DOORS 
LOCKED BEHIND YOU . " : GOSUB7 0 

65 CLS: PR I NT @160," REMEMBER, T 

HE LOWER YOUR"," TIME, THE BET 
TER 1 Ull" 

66 SCREENO , 1 : FORX=1T01000 : NEXTX 

67 PLAY b V30L255O1GFEDCBAV25GFEDC 
BAV20GFEDCBAV15GFEDCBAV10GFEDCBA 
V5GFEDCBAV3GFEDCBAV2GFEDCBA" 

68 G0T016 

69 CLS : A$=CHR$ ( 191 ) s PRINT@109 , A$ 
:PRINT@113,A$ : PRINT® 141, A$ sPRINT 



@1 43, A$ sPRINT® 145, A$ 

70 PRINT@449 , " ** PRESS enter TO 
CONTINUE **" ; sSCREENO,l 

72 Q$=INKEY$ : IFQ$=CHR$ ( 13 ) THEN R 
ETURN ELSE72 

73 CLS7:PRINT@169, "*** ROOMS *** 

" ; : PLAY "T100V1 503 AEDAEDAEDAED" 

74 FORX=1T01000 : NEXTX 

75 CLS7sPRINT@160, "THE ROOMS ARE 
ARANGED LIKE THIS."; 

76 FORX=1T01000 : NEXTX 

77 PMODE4 , 1 : PCLS :LINE(50,30)-(20 
0,160) , PSET,B:LINE(100,30)-(100, 
45) ,PSETsLINE(150,30)-(150,45) ,P 
SETs LINE( 10 0,160) -(100, 145) ,PSET 
:LINE(150,160)-(150,145) ,PSET 

78 LINE(50,73)-(65,73) ,PSET:LINE 

(50.118) -(65,118) ,PSETs LINE (200, 
73)— (185,73) , PSET: LINE (200, 118)- 

(185.118) ,PSET:LINE(85,73)-(115, 
73) ,PSET: LINE (135, 73) -(16 5, 73) ,P 
SETs LINE( 85, 118) -(115, 118) ,PSET: 
LINE( 135,118) -(165, 118 ) ,PSET 

79 LINE(100,58)-(100,88) ,PSET:LI 
NE( 150, 58) -(150, 88) ,PSET : LINE ( 10 
0 , 103 ) - ( 100 , 133 ) ,PSET: LINE (150,1 
03 ) - ( 150 , 133 ) , PSET s SCREEN1 , 1 

81 FORX=lTO250:PLAY"V2OlL255AB" : 
NEXTX 

82 CLS 7 : PRINT@163 , " YOU SEE ONLY 
ONE ROOM " ; 

83 FORX = lTO1000 s NEXTX 

84 PMODE4 , 1 : PCLS0 : COLOR5 : LINE ( 47 
, 150 ) - ( 208 , 30 ) , PSET , B : COLORO s LIN 
E(115,30)— (145,30) , PSET : LINE (115 
, 150 ) - ( 145 , 150 ) , PSET: LINE (47, 75) 
-(47,105) ,PSETsLINE(208,75)-(208 
,105) , PSET : SCREEN1 , 1 

86 FORX=lTO250 : PLAY"DE" : NEXTX 

87 PRINT@160, "PRESS THE SPACE BA 
R OR THE" , "JOYSTICK BUTTON TO RE 
OPEN ALL THE DOORS ." s PRINT" 

TRY IT." 

88 PLAY" V0 " s G=0 

89 FORX=lTO500:Q$=INKEY$:P=PEEK( 
65280) : IFP=126 ORP=254THEN G=1 

90 IF Q$=CHR$ ( 32 ) THEN G=1 

91 IFG=1 THENPLAY"01L20T20V+ABCD 
EFG" :W=W+1 : IFW>10 THEN93 ELSE91 

92 NEXTX :GOT016 

94 CLS 3 :PRINT@170,"*** YOU ***"; 

: PLAY" V30L16O2AP32AP32AP32L8O3E 

95 FORX=lTO1500 : NEXTX : CLS 

96 PRINT@67, "YOU'RE A FAMED TRAV 
ELER" , "SENT OUT TO CAPTURE A SPE 
CIMEN OF THE SPAZMORG. YOU'VE A 
LREADY FOUND YOUR WAY INTO THE D 
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Setting 

The Standards 

WHAT THEY ARE SAYING ABOUT COLORPEDE 

“...forefront of the pack...’ the Rainbow, Dec. ’82 “...an outstanding offer.” N. Vernon, IN ...the best graphics I have seen to date.” Erie, PA 
‘‘It is great!” Dayton, OH ‘...the best graphics and playability of any color computer game..." McKeesport, PA 




COLORPEDE 

This truly outstanding engineer designed, 100% 
machine language game with multi-colored high 
resolution characters and fast action will chal- 
lenge the most avid arcade buff. Can be played 
by 1 or 2 players controlled with joy sticks or key 
board. Joy stick control is fast, smooth and ac- 
curate. As COLORPEDE slithers through the toad 
stools, you attempt to destroy the COLORPEDE, 
knock out the menacing Bouncing Bug and elim- 
inate toad stools while accumulating higher and 
higher scores. Demonstration mode with top 5 
scores. Pause feature. For 16K Color Computer 
and TDP-100. 

Cassette-$29.95 Disk-$34.95 




ROEOTTm 

Ultra fast arcade action with colorful high resolu- 
tion graphics. You are the super human who must 
fight off the attacking robots and save the remain- 
ing humans from destruction. You have super 
powers, can shoot in any direction and move 
anywhere on the screen to accomplish your vital 
mission. 

Engineer designed, 100% machine language. 
Can be played by 1 or 2 players with joy stick con- 
trol. Top 5 scores displayed. Pause feature. For 
1 6K Color Computer and TDP-1 00 with joy sticks. 

Cassette-$24.95 Disk-$27.95 

TO ORDER: 

VISA, MASTERCARD, Money Order. 
Please allow 2 weeks for checks. Add 
$1 .50 for shipping, $3.00 outside U.S. 4% 
tax in Mich. 



\ 

-( 

/ 



/ 



intracolor 



P.O. Box 1035, East Lansing. Ml 48823 
(517) 351-8537 



COMMUNICATIONS 



DEALER INQUIRIES INVITED 



QUALITY PROGRAMS SOLICITED 








EPTHS OF THE TOWER WHERE IT DWE 
LLS. NOW YOU MUST TRAP AND CA 
TCH IT."; 

97 PRINT" YOU START IN THE CENTER 
OF NINE ROOMS. THE BABY SPAZMOR 
G IS IN ONE OF THE OTHER ROOMS. 
" :GOSUB70 

99 CLS : A$=CHR$ ( 175 ) +CHR$ ( 175 ) +CH 
R$ ( 175 ) : PRINT® 142 ,A$ : F0RX=171T01 
7 7 STEP 3 : PRINT@X , A$ : NEXTX : PRINT® 2 
06 ,A$ : PRINT@236 ,A$ : PRINT® 240 ,A$ 

100 PRINT® 29 4 , "YOU LOOK LIKE THI 
S" 

101 FORX=lTO50:PLAY"V2L255T255O5 
AGBFCED" :NEXTX:GOT016 

102 CLS2:PRINT@169, "BABY SPAZMOR 
G" ; : PLAY"V20L8T8O4ACEL6GL8GECABD 
FFDBABCBAL4A" 

103 FORX=lTO500; NEXTX 

104 CLS : PRINT® 3 5 , "THE BABY SPAZM 
ORG IS A FAIRLYHARMLESS CREATURE 
. UPON YOUR" , "APPROACH HE WILL R 
UN TO ANOTHER ROOM. YOU MUST TRY 

TO TRICK HIM AND TRAP HIM IN A 
ROOM WITH ALL THE DOORS CLOSED B 
EHIND YOU." 

105 PRINT" WARNING: HE WILL SOM 
ETIMES", "SNEAK THROUGH A DOOR JU 
ST AS", "YOU ENTER A ROOM. BE REA 
DY TO GRAB HIM ! " : GOSUB7 0 

107 CLS : A$=CHR$ ( 191 ) +CHR$ ( 191 ) : P 
RINT@109,A$ sPRINT® 111 ,A$: PRINT® 1 
13 , A$ :PRINT®143,A$ sPRINT® 173, A$ : 
PRINT@175,A$ : PRINT® 177, A$ : PRINT® 
205 ,CHR$ ( 191 ) : PRINT® 207, A$ {PRINT 
®210 ,CHR$ ( 191 ) 

108 PRINT® 26 3 , "THE BABY SPAZMORG 
" :V=0 

110 PLAY"V1002L10T8GFEDCBA" :V=V+ 
1 j IFV<10 THEN110 ELSE16 

111 CLS 4 :PRINT@166 , "THE MOTHER S 
PAZMORG" ; : PLAY"V30T6L601ABCDGFED 
ABCDGFED" 

112 FORX=lTO500 :NEXTX 

113 CLS : PRINT@34 , "THE MOTHER SPA 
ZMORG IS YOUR", "MOST DANGEROUS E 
NEMY! SHE IS", "FASTER AND MORE P 
OWERFUL THAN THE SPIDER. IN VE 
RSION '1' SHE WILL START TO CHA 
SE YOU AFTER A FEW MINUTES. IN 

VERSIONS '2'" 

114 PRINT" AND '3' SHE IS OUT FRO 
M THE" , "START. " :GOSUB70 

116 CLS3 : A$=CHR$ ( 191 ) :PRINT®109, 
A$; :PRINT®113,A$; :PRINT@141 , A$ ; s 
PRINTQ143 , A$ ; : PRINT® 145 , A$ ; 



117 PRINT@175,A$; : PRINT@206 , A$+A 
$+A$ ; sPRINT® 2 37 ,A$ ; :PRINT@239 , A$ 
; sPRINT®241,A$; 

118 PRINT® 294 , "THE MOTHER SPAZMO 
RG" ; 

119 FORX=1T020:PLAY"01V10L20T20A 
BCDCBA" {NEXTX {GOT016 

120 CLS0 {PRINT @168,"** THE SPIDE 
R **"; 

121 FORX=1T020{PLAY"01V30T30L30A 
CEGECA" {NEXTX 

122 CLS s PRINT® 33 , "THE SPIDER DWE 
LLS IN THE GREEN ROOM OF THE TOW 
ER. UNLIKE THE MOTHER SPAZMORG 

HE NEVER LEAVES THIS ROOM. BE C 
AREFUL WHEN YOU CHANGE ROOMS, O 
R WHEN THE WINDS HIT. YOU MAY RU 
N RIGHT INTO HIM!" 

123 A$=CHR$ ( 255 ) +CHR$ ( 255 ) : PRINT 
@300 , A$ ; :PRINT@305,A$:PRINT@334, 
A$+CHR$ ( 255 ) : PRINT® 364 ,A$ : PRINT® 
369 , A$ : GOSUB7 0 : GOTOl 6 

126 CLS5:PRINT@171,"** WINDS **" 



127 PLAY"V24" ; F=0 

128 PLAY"01L255T200V-AEGBDCF" :F= 
F+l : IFF<23THEN128 

129 CLS : PRINT® 3 3 , "THE MAGICAL WI 
NDS OF THE TOWER CAN BE BOTH A P 
ROBLEM OR A" , "LIFESAVER. THEY WI 
LL BLOW", "OCCASIONALLY AND SEND 
YOU INTO A RANDOM ROOM. SOMETIM 
ES THE", "BABY SPAZMORG WILL BE T 
HERE,", "AND SOMETIMES THE SPIDER 

WILL BE THERE. " :GOSUB70 

132 PLAY"V24" :F=0 

133 PLAY"01L255T200V-AEGBDCF" :F= 
F+l { IFF<23 THEN133 ELSE16 

135 CLS6 : PRINT@170 , "NO JOYSTICKS 
?"; :FORX=lTO1000: NEXTX 

136 CLS { PRINT® 3 4 , " IF YOU DON'T H 
AVE JOYSTICKS, DON'T WORRY. THE 

KEYBOARD CAN BEUSED.",," THE A 
RROWS ARE FOR DIRECTION, AND THE 
SPACE BAR IS USED TO", "OPEN ALL 
THE DOORS IN THE TOWER." 

137 GOSUB7 0 : GOT016 

138 CLS 8 :PRINT@169,"** VERSIONS 
**" ; :PLAY"02L10T10V25ABCDEFGFEDE 
FGFEDCBABCDCBABCDEFGFEDEFGFEDCBA 
BCDCBAAABABA" 

139 CLS S PRINT@34, "THERE ARE THRE 
E VERSIONS YOU CAN TRY. YOU SHO 
ULD START WITH THE FIRST, AND W 
HEN YOU'VE", "MASTERED IT TRY THE 

OTHER TWO. THE SECOND AND THIR 
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AARDVARK s4cUa*t 

PRESENTS . . . 




CATALOG SPECIAL send one 
dollar for current catalog. Receive 
also. $1.00 cash certificate, good 
towards next purchase 



BAG-IT-MAN . . . This one feels so arcade like, you’ll 
want to put quarters in. You’ll be amazed and 
excited over three screens full of arcade style fun. 

We have: bags of gold, elevators, mineshafts, 
rolling carts, and two of the nastiest guards 
you’ll see in a long time, trying to protect it all! 

All machine code with super color, excellent sound 
and continuous action and excitement. 

Available on: TRS-80C 32K CMD64 

Stock #1061 Tape $24.95 Disk: $29.95 



DUNGEONS OF DEATH 

a serious D& Dtypegamefor 
up to 6 players at a time. You 
get a choice of race and 
character, on screen mapping 
ofthe maze, a chance to grow 
from game to game, and a 
15 page manual Requires 
extended basic on TRS-80C. 
Available On: TRS-80C 16K. 
CMD 64. VIC 20 13K. 
TRS-80C 32K Disk 
Stock #7001, Tape $19.96. 

Disk $24.95 



Aardvark Action Software is 
available at software retailers 
everywhere If your local 
computer or software store 
doesn’t carry it - ask them 
why not. Dealer inquiries 
invited. 



WIZARDS TOWER this D & D 
adventure is played on a map of 
forest and dungeons. Similar in play 
to Quest, it has dungeons and 
dragons and more Two to five hour 
playing time, and different every 
time TRS-80C and TI/99-4Arequire 
extended basic. 

Available On: TRS-80C 16K. CMD 64. 

VIC 20 13K, TI/99-4A 

Stock #7010. Tape 419.96, Diak $24.96 




PYRAMID our toughest and most 
intriguing adventure Average time 
through the pyramid is 50-70 hours 
Clues everywhere and some very 
ingenuous problems This one is 
popular around the world 

Available On: TRS-80C 16K. CMD 64. 
VIC 20 13K. Timex Sinclair. TI/99-4A 
Stock #6002. Tape $19.96. Diak $24.96 



TO ORDER: Send amount indicated plus $2.00 shipping, per order. Include stock number, quantity desired and your preference of tape or 
disk. Be sure to indicate type of system, amount of memory, etc. When using charge card to order by mail, be sure to include expiration date. 






CHARGE CARDS 
WELCOME 



1 - 800 - 624-4327 



PHONE ORDERS ACCEPTED 
8:00 a.m. to 8:00 p.m. E.S.T.. MON-FRI 



AARDVARK s4ctto*t S<^tcva f ie 



2362 S. COMMERCE • WALLED LAKE, Ml 48088 • (313) 669 3110 
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D VERSIONS HAVE DOORS THAT AUT 

OMATICALLY OPEN AND CLOSE, MAK 

ING THINGS" 

140 PRINT" DIFFICULT . THE THIRD V 
ERSION" , "HAS A MEANER, FASTER MO 
THER. ", "RESERVE THAT ONE FOR LAS 
T." :GOSUB70 

142 CLS:PRINT@34,"IF YOU WOULD L 
IKE TO SWITCH", "FROM JOYSTICKS T 
0 THE KEYBOARD (OR VICE VERSA) 
THEN PRESS THE 'J' KEY DURING T 
HE 'PLAY AGAIN?' SECTION. " 

144 GOSUB70 :G0T016 

145 CLS3 : PRINT@161 , "ARE YOU REAL 
LY READY TO CLOAD" ; : PRINT@200 , "T 
HE GAME? (Y/N)?"; 

146 Q$=INKEY$ : IF Q$="N" THEN16 E 
LSEIFQ$= " Y" THEN148 ELSE146 

148 CLS4 : PRINT® 16 5, "SET THE CASS 
ETTE PLAYER" ; :PRINT@234," PRESS 
enter " ; 

149 Q$ = INKEY$ : IFQ$OCHR$ ( 13 ) THEN 

149 ELSECLOAD" SPAZMORG" ■■■ 



Program Listing. Spazmorg by A.E. Bogdan 



0 CLS6 :PRINT@168, "JOYSTICKS (Y,N 
)?"; ; SCREENO , 1 

1 E$=INKEY$ : IFE$=" Y"THENQ=1ELSEI 
FE$="N"THENQ=0ELSE1 

2 IFS>0THENCLS3 : G0T095ELSES0UND1 
78,1: CLS6 : PRINT® 170 , "GAME (1,2,3 
)?" SCREENO, 1 

3 E$=INKEY$ : IFE$="1"THENELSEIFE$ 
="2"THENGA=1ELSEIFE$="3"THENGA=1 
: I=1ELSE3 

4 PMODE4 : PCLS : SCREEN1 , 1 : PMODEl : H 
S=300 :PLAY "VO" jDIM D(9,4) 

5 DRAW"BM15,80R20U20L20U20R20BM4 
5,80U40R20D20L20BM75,80U40R20D40 
U20L20BM105 , 80R20L20U10E20U10L20 
" :G0T07 

6 DRAW"BM135 , 80U40F10E10D40BM165 
, 80U40R20D40L20BM195 , 80U40R20D20 
L20F20BM225 , 80U40R20L20D40R20U20 
L5" 

7 H=H+1:L=L+1:IFH>29THEN9ELSEPLA 
Y"V+T255L255DA" :R=RND(3) :R=R+5:C 
OLORR: IFL=5THENL=1 : IFH=29THENPMO 
DE3 , 1 

8 IFL=1THEN5ELSEIFL=2THENC0L0R5: 
G0T05ELSEIFL=3THEN6ELSEIFL=4THEN 
COLORS :G0T06 

9 0=0+1 : IF0>1THENPLAY"01L8T8V24A 
BCDEFG02ABCDEFG03ABCDEFG04ABCDEF 
G05ABCDEFG" :GOTO!OELSEIFO=1THEN6 



10 PMODE4 : PCLS5 : PMODE2 : SCREEN1 , 2 
: PS=RND ( 8 ) : PT=RND ( 8 ) : MP=RND ( 8 ) : G 
M=6 j GN=6 : HM=15 : TM=0 : G=5 : K=1 : R=9 : 
C=0:DI=0:F=5:CLS5:Z=5:Y=15:X=296 
7:S=2968:MS=2968: J=2968:I=20 jGOS 
UB11 : G0T026 

11 PLAY "VO " : W=0 : MP=R 

12 PLAY"01L20T20V+ABCDEFG" :W=W+1 
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Access the world of CP/M 



Add Z80 power to your Color Computer 

Includes CP/M 2.2 & Utilities 

Plug in and Run! 




The hardware is complete and fully 
compatible with your TRS-80 
Color Computer, disk controller, 
and disk drive(s). Simply plug CoCo 
Coupler 1 between the computer and 
disk controller— no modification 
to your system is needed. CoCo 
Coupler 1 provides a solid, reliable 
platform for your disk controller 
cartridge. 

Z80 Power 

The CoCo Coupler 1 contains its own 
4 mHz Z80A microprocessor and 
firmware for efficient execution of 
CP/M programs. 

The Software is complete. In addition 
to the standard CP/M utilities, you 
receive the Wayne Technology disk 
copy and format utilities. 



Plug CoCo Coupler 1 into your TRS-80 
Color Computer, boot the supplied 
CP/M 2.2 diskette and you’re ready 
to load and run any of thousands of 
professional and personal programs. 

Operation is simple: Menu select 
CP/M and the CoCo Coupler 1 firm- 
ware loads the powerful CP/M operat- 
ing system. Select Color BASIC, and 
your color computer programs will 
run perfectly. 

For word processing, CoCo Coupler 1 
provides a 32-character by 16-line 
window which is quickly positioned to 
any area of the 80-character by 
24-line display page. With CoCo 
Coupler 1 you are ready for the 
world of CP/M. 



Specifications 

POWER REQUIREMENT 
5.0 VDC @ 225 mA ± 10% 
supplied by Color Computer 

DISK FORMAT 
Compatible with Omikron/ 
TRS-80 Model I 

DISPLAY CONTROL 
emulates Lear Siegler 
ADM-3A terminal 

WARRANTY 
90 days 

To Order 

CoCo Coupler 1 assembled and 

tested, complete with CP/M 2.2 

diskette and User Reference Manual: 

$250.00 



shipping included 
Check, Money Order, M/C or Visa 
accepted. 

California residents add 6%. 
Compatible with WORD-PAK 80 X 24 character display Module from PBJ-Inc. 
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WAYNE TECHNOLOGY 



P.O. BOX 5196 • ANAHEIM, CA 92804-1196 • (714) 772-5757 



2 ) =0 s D ( 6 , 4 ) =0 

24 R=7 :GOSUB27 :GOSUB38 : IFZ=10THE 
NZ=1:Y=15:X=2963:D(7,2)=0:D(6,4) 
=0 : G0T023ELSEIFY=1THENY=28 : Z=6 s X 
=3800:D(7,1)=0:D(8,3)=0 

25 R=8 : GOSUB27 : GOSUB38 s IFY=1THEN 
Y=28:Z=6:X=3800:D(8,1)=0:D(1,3)= 
0 :G0T018ELSEIFY=28THENY=1 : Z=5 : X= 
2071:D(8,3)=0:D(7,l)=0:GOTO24ELS 
EIFZ=10THENZ=1:Y=15:X=2963:D(8,2 
)-0:D(9,4)-0 

26 R=9 s GOSUB27 j GOSUB38 : IFZ=1THEN 
X=2972{Y=15:Z=10:D(9,4)=0sD(8,2) 
=0:GOTO25ELSEIFZ=10THENX=2963:Y= 
15:Z=1:D(9,2)=0:D(4,4)=0: G0T021E 
LSEIFY=1THENZ=6:Y=28:X=3800:D(9, 
l)=0;D(2,3)=0sGOTO19ELSEIFY=28TH 
ENZ=5:Y=1:X=2071:D(9,3)=0:D(6,1) 
=0 :G0T023 

27 PMODE2 s PCLS s PLAY "V20L20T2 003 E 
" {LINE (47, 150) -(208 ,30) ,PSET,B:C 
OLORO j SCREEN1 , 1 s IFR=PT THENPOKE6 
5314,150 

28 IFHD>5THENCOLOR5 

29 IFD( R, 1 ) =1THENLINE (115,30)-(1 
45,30) ,PSET 

30 IFD( R, 3 ) =1THENLINE (115,150)— ( 
145,150) ,PSET 

31 IFD( R, 4 ) =1THENLINE (47,75)— (47 
,105) ,PSET 

32 IFD( R, 2 ) =1THENLINE (208,75)-(2 
08,105) ,PSET:IFTM<2THENRETURN 

33 PLAY"V1502L255T255GECA01GECA" 
{RETURN 

34 V=JOYSTK(0) :W=JOYSTK(l) :RETUR 
N 

35 IFPEEK ( 341 ) =247THENW=0ELSEIFP 
EEK( 342 ) =247THENW=63ELSEW=32 

36 IFPEEK ( 343 ) =247THENV=0ELSEIFP 
EEK ( 344 ) =247THENV=63ELSEV=32 

37 RETURN 

38 T=X : IFR=PS THENGOSUB53 

39 IFQ=1THENG0SUB34ELSEG0SUB35 

40 IFV<5THENX=X-1:Z=Z-1ELSEIFV=> 
55THENX=X+1 : Z=Z+1 

41 IFW<5THENX=X-64:Y=Y-1ELSEIFW> 
55THENX=X+64:Y=Y+1 

42 IFGA=1THENGOSUB102 

43 IFZ<1THENX=X+1 ; Z=Z+1 : IFY<20AN 
DY>10ANDD ( R, 4 ) =1THENRETURN 

44 IFZ>10THENX=X-1:Z=Z-1:IFY<20A 
NDY> 10 ANDD ( R , 2 ) =1THENRETURN 

45 IFY<1THENY=Y+1 :X=X+64 s IFZ>4AN 
DZ<7ANDD ( R , 1 ) =1THENRETURN 

46 IFY>28THENY=Y-1:X=X-64:IFZ>4A 
NDZ<7ANDD( R,3 ) =1THENRETURN 



47 POKET, 0 : POKET+32 , 0 : POKET+64 , 0 
s POKET+96 , 0 : POKEX ,24; POKEX+3 2 , 1 2 
6 : POKEX+64 , 24 : POKEX+96 ,36sQ$=INK 
EY$ : IFQ$<" Z " ANDQ$> " A"THENF5=5 : GO 
SUB100 

48 TM=TM+1 s IFTM>200ORGA=lTHENGOS 
UB72 

49 IFR=PT THENGOSUB68 

50 IFDI=1THEN88ELSEB=PEEK ( 65280 ) 

: IFB=1260RB=2540RQ$=CHR$ ( 32 ) THEN 
GOSUBll 

51 IFC=5THENGOSUB84 

52 RT=RND( 200 ) : IFRT=50THEN81ELSE 
38 

53 E=S : IFOOTHEN57 

54 C=RND(4) : IFD ( R, 1 ) =0ANDD ( R , 2 ) = 
OANDD ( R , 3 ) =0ANDD ( R , 4 ) =0THENC=5 : G 
0T061 

55 IFC=1ANDD ( R , 1 ) =OTHENC=RND ( 3 ) : 
C=C+1 

56 IFC=2ANDD(R,2)=0THEN54ELSEIFC 
=3ANDD(R,3)=0THEN54ELSEIFC=4ANDD 
( R , 4 ) =OTHENC=RND ( 3 ) :G0T055 

57 IFX+48=S+320RX+48=S+160RX+48= 
S+480RX+32=S+160RX+32=S+320RX+32 
=S+48THEN90ELSEPOKEE , 0 : POKEE+16 , 
0 : POKEE+32 , 0 : POKEE+48 ,0:IFC=2THE 
NS=S+1 ;IFS>2972THEN62 

58 IFC=4THENS=S-1: IFS<2963THEN63 

59 IFC=1THENS=S-96:IFS<2070THEN6 
4 

60 IFC=3THENS=S+96 : IFS>3800THEN6 
6 

61 PLAY"04;L255T255V3B" :POKEE+48 
, 0 : POKES , 56 : POKES+16 , 16 : POKES+32 
, 56 : POKES+48 , 40 : RETURN 

62 C=0 : IFR=9THENPS=4 ; S=2968 : RETU 
RNELSEIFR=8THEN PS=9 : S=2968 : RETU 
RNELSEIFR>0ANDR<3THEN PS=PS+1:S= 
2968 : RETURNELSEPS=PS-1 : S=2968 : RE 
TURN 

63 C=0 : IFR=9THENPS=8 : S=2968 : RETU 
RNELSEIFR<4ANDR>1THEN PS=PS-1:S= 
2968 : RETURNELSEIFR=4THEN PS=9:S= 
2968 : RETURNELSEIFR>4ANDR<7THEN P 
S=PS+1 s S=2968 : RETURN 

64 IFR=8THENPS=1ELSEIFR=9THENPS= 
2ELSEIFR=4THENPS=3ELSEIFR=7THENP 
S=8ELSEIFR=6THENPS=9ELSEIFR=5THE 
NPS=4 

65 S=2968:C=0: RETURN 

66 IFR=4THENPS=5ELSEIFR=9THENPS= 

6ELSEIFR=8THENPS=7ELSEIFR=3THENP 
S=4ELSEIFR=2THENPS=9ELSEIFR=1THE 
NPS=8 | more 
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the CoCo 
Professional 



TAX 
PREPARER 



FOR THE INDIVIDUAL, 

IT ELIMINATES ANXIETY 

File your taxes in confidence. The CoCo Professional Tax Pre- 
parer is accurate, thorough, and easy to use. Just answer the 
questions. 

The CoCo Tax Preparer interviews you the way professionals in 
the large walk-in tax firms do. It takes you through each tax 
form in an organized manner. It knows which forms you need 
based on how you answer the questions it asks. And you can 
change data and make corrections - no hassle. 

When you're done, the program prints your completed tax 
return on government-approved forms. 

FOR THE PROFESSIONAL TAX PREPARER, 
IT SAVES TIME 

Spend your time doing what you're supposed to do. You make 
the important business decisions, the CoCo Tax Preparer will 
do the rest. And you can simplify your filing — one diskette per 
client. 

Interview your clients in a time-saving manner and get rid of 
your check-off sheets. 

Produce complete tax returns on government-approved forms. 
The CoCo Tax Preparer lets you run continuous multicopy 
forms in the order you need, when you need them. 



PROGRAM FEATURES 

Designed by a 15-year tax consult- 
ant, the program has built-in tax ta- 
bles and tax rate schedules and 
supports the following forms: 

1040 

Schedules A, B, C, D, E, G, SE, W 

Forms 2106, 2119, 3903, 4797 

Office-at-Home 

Installment Gain 

Dependency Support 

Credits and Other Taxes 



149 ” 

For a limited time only. 
A $400 value 



MORE FEATURES 

• Over 170 full-screen menus displayed on command. Fully 
menu-driven screens *— each appears only when required. 

• Full reverse-screen scrolling and forward-screen block scroll. 

• Calculator mode supports + , — = on numeric data. 

• Edit capability: any line at any time. Supports change, delete, 
hack, search, and insert commands. Eliminates the need for 
check-off sheets 

• Runs on 32K extended Basic (one disk drive with change of 
diskette during program execution) or two disk drives. (A 
special-order version runs on 64K RAM units with one or two 
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67 S=2968:C=0: RETURN 

68 J2=J j IFX-J>0ANDX-J<10THENJ=J+ 
1ELSEIF J-X>0 ANDJ-X<10THENJ=J-1 

69 IF J<X THEN J=J+6 4ELSEIF J>X TH 
EN J=J-64 

70 IFX=J THENDI=1 

71 PLAY"OlL255T255V10E" :POKEJ2,0 
: POKE J2+3 2 , 0 : POKE J2-32 , 0 : POKE J, 2 
4 s POKEJ+32 , 36 : POKEJ-32 , 36 : RETURN 

72 IFTM=201THENSOUND200 , 1 ELSE I FT 
M<8THENRETURN 

73 GM=GN:IFR=MP THEN75ELSEL=L+1 j 
IFL>I THENL=0 j GM=5 : MP=MP+1 s IFMP= 
10THENMP=1 

74 RETURN 

75 SM=MS : RT=RND ( 2 ) j IFRT=1THENRT= 
96ELSEIFRT=2THENRT=64 

76 IFZ<GM THENMS=MS-1 s GM=GM-1 : GO 
T077ELSEIFZ >GM THENMS=MS+1 : GM=GM 
+ 1 

77 IFX<MS THENMS=MS-RT : HM=HM-1EL 
SEIFX>MS THENMS=MS+RT : HM=HM+1 

78 IFGM<1THENGM=GM+2:MS=MS+2ELSE 
IFGM>10THENGM=GM-2 : MS=MS-2 

79 IFMS=X0RMS=X+160RMS=X+320RMS= 
X+480RMS=X+640RMS=X+960RMS+6 4=X+ 
320RMS+64=X+640RMS+96=X+320RMS+9 
6=X+640RMS+96=X+96THENDI=1 

80 PLAY"02L255T255V24AB" :POKESM, 
0 : POKESM+3 2 , 0 ; POKESM+6 4,0: POKESM 
+96,0: POKESM+128 , 0 : POKEMS , 68 : POK 
EMS+32 , 84 : POKEMS+64 , 16 : POKEMS+96 
, 40 :POKEMS+128 , 84 :GN=GM: RETURN 

81 RZ=R: R=RND ( 9 ) : RN=RND ( 2 ) : IFRN= 
1THENGH=141ELSEIFRN=2THENGH=135 

82 C=0 : IFRZOR THENS=2968 

83 PLAY"V24" : FG=0 : POKE65314 ,GH : G 
OTO107 

84 C=0 : IFX=S0RX=S+160RX=S+320RX= 
S+480RX+64=S0RX+64=S+160RX+64=S+ 
320RX+64=S+480RX+48=S0RX+48=S+16 
ORX+48=S+32ORX+48=S+48ANDK=0THEN 
90 

85 M=RND( 40 ) :E=S: IFM<10THENS=S+1 
: G=G+1ELSEIFM>30THENS=S-1 : G=G-1E 
LSEIFM>10ANDM<20THENS=S-32ELSEIF 
M>20ANDM<30THENS=S+32 

86 IFG<2THENS=S+1:G=G+1ELSEIFG>8 
THENS=S-1:G=G-1 

87 K=0 : POKEE , 0 : POKEE+16 , 0 : POKEE+ 
32,0: POKEE+48 , 0 : RETURN 

88 PLAY"O5":U=0 

89 PLAY"O-L255T255V20GFEDCBA" :U= 
U+l : IFU=4THENCLS4 : PRINT@74 , "YOU 
LOSE ! 1 ! " ? :G0T095ELSE89 



90 CLS3 : PLAY "01" : 0=0 : PRINT@75 , " Y 
OU WIN! !"; 

91 PLAY"O+V20L8T8EP8EP8EP8L2E" :0 
=0+1 : IFO=4THENELSE91 

92 PRINT® 16 6 , "YOUR TIME WAS:"TM/ 
2; : IFTM/2<40THENPRINT@298 , "EXPER 
THU!" ; :PLAY"V24L7T703DP32DP32D 
P32L3T3G"ELSEIFTM/2>39 . 99ANDTM/2 
<80THENPRINT@300, "AVERAGE " ; ELSE 
IFTM/2>79 . 99THENPRINT@301 , "NOVIC 
E" ; 

93 FORX=lTO1500 : NEXTX : IF TM/2<HS 
THENHS=TM/2 

94 CLS3 :PRINT@199,"BEST TIME:"HS 
;: FORX=lTO500 : NEXTX : CLS4 

95 PRINT@199 , " PLAY AGAIN? " 

; : PRINT@263 , " GAME (1,2,3)? "; 

: SCREENO , 1 

96 HD=0 : F$=INKEY$ : P=PEEK ( 65280 ) : 
IFP=126ORP=254THEN10ELSEIFF$="Y" 
THEN10ELSEIFF$="N"THEN98ELSEIFF$ 
=" 1 "THENGA=0 : 1=20 : SOUND1 , 1 ELSE IF 
F$=" 2 "THENGA=1 : 1=20 : SOUND81 , 1ELS 
EIFF$=" 3"THENGA=1 : 1=1 : SOUND127 , 1 
ELSEIFF$="J"THEN0 

97 G0T096 

98 IFHS=300THENHS=0 

99 CLS8:PRINT@199, "BEST TIME:"HS 
; :PLAY"L6T6V2403ACDL4T4GP16G04L6 
T6ACDL4T4GP1605L6T6ACDL4T4GEL2T4 
G" : CLS0 : END 

100 COLORF : DRAW"BM70 ,170U10R4D5L 
4R4D5L4BM80 , 170U5L2U5D5R5U5BM105 
,170U10R4D10U5L4BM118,170U10R4L4 
D5R4L4D5R4BM135,170U10R4D5L4R4D5 
L4BM145 , 170U10R4D10L5BM155 , 170U1 
0R4L4D10R4U4L1BM165,170U10R2F2D6 
G2L2BM175 , 170U10R4D10U5L4BM185 , 1 
70U10F2D6F2U10" 

101 IFF=OTHENRETURNELSEPLAY" T5L5 
V2402ABDDP16DBAAP1601ABDDDBAAABC 
DEFG02ABCDEFG03ABCDEFGGGG" :F=0:G 
OTOIOO 

102 HD=HD+1 : IFHD>10THENHD=0 

103 COLORO : NB=0 : IFHD>5THENCOLOR5 
: NB=1 

104 IFHD=10RHD=6THENG0SUB29 

105 IFNB=lANDY<lTHENY=Y+l:X=X+64 
ELSEIFNB=1ANDY> 28THENY=Y-1 : X=X-6 
4ELSEIFNB=1 ANDZ < 1THENX=X+1 : Z = Z + 1 
ELSEIFNB=1ANDZ >10THENX=X-1 : Z = Z-1 

106 RETURN 

107 PLAY"01L255T200V-AEGBDCF" : FG 

=FG+l:IFFG=23THENONR G0T018,19,2 
0,21,22,23,24,25,26ELSE107 ■■■ 
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VackyFoOd! 



Hamburgers, fries, drinks and other fastfoods are 
chased by chattering teeth. Can you stop them 
before you go... WACKO? Three levels of play from 
beginner to expert. This is number one for fun. 

32K Disk $24.95 32 K Cass. $21.95 






Push blocks of ice to crush giant mosquitos and 
avoid getting stung long enough to get them all. 
Three levels with graphics so real you'll want your 
fly swatter. Don’t miss this arcade classic. 

32K Disk $26.95 32K Cass. $24.95 




l)l:SI:RT 

PATROL 




Armed with laser cannons guide yourdesert vehicle 
past obstacles while avoiding enemy fire. Watch out 
not to run out of fuel. Five levels of play. 

32K Disk $26.95 32K Cass. $24.95 



You are in a foodfight against the evil chefs. Can 
you eat the icecream cone before it melts? Fast 
paced arcade action and sound make this game 
unforgettable. Fifteen screens and ten levels of play. 

32 K Disk $27.95 32K Cass. $25.95 



All games 32K disk or cassette are written completely in machine language. Highest resolution arti- 
fact graphics and spectacular sound effects are just two of the exceptional features you will find. 

Each game records high score and multiple skill levels with play features comparable to current 
arcade games. 

Other works by this author Rainbow 7-83 

“Not only is the action portion ...spectacular, but the game is a visual triumph as well. ..with color 
rivaling most coin-op video games.” 

Order Line (201) 773-3474 - 24 Hours 

ORDERS SHIPPED WITHIN 24 HOURS BY FIRST CLASS MAIL, POSTAGE PAID 

Order now and enjoy this new generation of video games for your Color Computer. 



VISA 







21 The Fairway Upper Montclair, N.J. 07043 

* Dealers Inquires invited 0 
S Enter 26 on TeleResponse page 159 





I MAGINE A CLASSROOM without 
texbooks; students and teachers 
work on school assignments with a 
home computer when absent from school. 
Better yet, what about going to an elec- 
tronic university? While some of this may 
sound far-fetched, these scenes are now 
a reality. 

Consider the recent announcement by 
TeleLearning Network (based in San 
Francisco): it will offer 170 correspon- 
dence courses by computer. TeleLearn- 
ing President Ron Gordon predicts that 
within three years his company will edu- 
cate more people than any other private 
educational institution in the world. 
None of the current course offerings 
from TeleLearning are accredited; how- 
ever, Secretary of Education Terrel Bell 
attended the press conference that 
launched the company, lending a certain 
amount of legitimacy to the concept. In 
fact, Bell stated, "The thrilling thing 
about the concept of the Electronic Uni- 
versity is its flexibility and adaptability, as 
far as its ability to reach all learners on all 
levels and then to teach them where they 
are, and then to individualize the instruc- 
tion for each and every student. " 

This is just the first of what could be- 
come a widespread use of home com- 
puters for education via a database. 
Databases don't have to remain at home, 
however; schools should also be able to 
take advantage of databases with their 
computers. 

A database is nothing more than a 
large file of information used with a com- 
puter system. Don't let that definition 
fool you, though; once you hook your 
computer to a modem and can access a 
large database (like CompuServe), you 
have opened a window to a phenomenal 
volume of information. 

Suppose you need to access informa- 
tion normally contained in an encyclope- 
dia. One feature of CompuServe's data- 
base is Grolier's Academic American En- 



cyclopedia. Students may use this fea- 
ture of a database to enhance their re- 
search reports. 

Databases may also be used for infor- 
mation exchange. Where it used to re- 
quire a long distance phone call, or sev- 
eral days to exchange letters, to discuss 
an education project, it is now possible to 
share information in minutes via "elec- 
tronic mail." From California to Maine, 
students can communicate their ideas al- 
most instantaneously. 

Last minute updates can be included in 
research reports through database use. 
A student researching a Senate commit- 
tee hearing may be able to access the 
latest information from the Washington 
Post government menu. The information 
available via database is limitless. 

Database use doesn't require lots of 
expensive equipment. Your computer 
and monitor were the largest invest- 
ment; now all you need is a modem and 
terminal software. Beware, however, 
that most databases charge a fee based 
on the amount of time you spend on line. 

At School 

Let's look first at CompuServe, and 
what it was like to be a student at its In- 
formation Provider School. I went to the 
two-day school to learn how the infor- 
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CCS-1 
APPETIZERS 
SALADS 
MAIN COURSE 
DESSERTS 
BEVERAGES 



APPETIZERS 



1 ANTIPASTO 
Z. PRIED MUSHROOMS 
3 SHRIMP COCKTAIL 
4. PATE 

5- CHEESE FONDUE 



CAESAR 
WALDORF 
TOMATO 
SALAD BAR 



Figure 7. A Sample Menu from Chez 
CompuServe 



mation you access on CompuServe is 
sent. Being a student and not a teacher 
was an enlightening role change for me. 
Our class was warned that two days was 
barely enough time to cover the informa- 
tion, and we would be working hard. The 
huge notebook placed at each seat added 
weight to this warning . 

I was proud to represent my school dis- 
trict and The Color Computer Maga- 
zine. I soon discovered I was among top- 
level students. Representatives from 
Tandy, Educational Research Informa- 
tion Center (ERIC), Digital Research, 
Grolier's Academic American Ency- 
clopedia, Social Security, Library of Con- 
gress, CompuServe, and even the Inter- 
nal Revenue Service were present. 

One participant was deaf and blind; a 
companion typed the class proceedings 
on a keyboard which transmitted the 
material to the blind student in braille. 
This classmate has been developing files 
for blind people to use that are available 
through The Library of Congress. 

We were introduced to officials from 
CompuServe and our two teachers, Mary 
Beth Finley and Lynn Galli, who have a 
fine command of "computerese," which 
made me reflect on the ways computer 
technology has butchered the English 
language. Mary Beth and Lynn intro- 
duced us to words like Filge, RUNF10, 
navigational, menu, tree, own, page and 
files. As I reflect on the common words, 

I wonder if we might have better created 
new words for computer technology. 

Our first task was to define videotex. 
Basically, videotex can be used to de- 
scribe any text displayed over a video 
screen. Each screen represents one page 
of information. To put this in context, 
CompuServe contains more than half a 
million pages of information. 

Our first day was devoted to a pro- 
gram called Filge, or in English: File Gen- 
erator and Editor. Filge is an easy-to-use 
program that creates and edits files. For a 
definition, consider a file a collection of 
data uniquely identified by a name and 
extension. We were given "hands-on" 
computer time to work with the pro- 
gram; our first assignment was to devel- 
op files for a restaurant menu. We were 
given a list of 50 food items and bever- 
ages and told to arrange them so a Com- 
puServe user could access them easily. 
My partner and I found this to be an easy 
task, and arranged our main menu into 
beverages, appetizers, main courses, 
salads, and desserts (see Figure 1 ). 

Filge was just the first step; the next 
was RUNF10, a strange name for a text- 
formatting program which produces out- 
put files with specified features. Output 
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files are 32 characters wide and 12 lines 
in length. Other features of the RUNF10 
program include justified or ragged right 
margins, page size and line length con- 
trol, paragraphing, right, left or center- 
ing text, and page headings and foot- 
ings. 

Finally we used Framer, an interactive 
menu-formatted system used to view 
textual information. Framer is the final 
step before a CompuServe user accesses 
information placed in the database. 

The content of these programs is not 
significant; what is important is that one 
can become an information provider eas- 
ily. Electronic retrieval of information is 
just beginning to emerge as an impor- 
tant source for educators. Heretofore, 
outdated books or even days-old maga- 
zines were the best and most up-to-date 
materials available to teachers. Television 
and newspapers provide current events, 
but are limited to the stories selected by 
editors. 

Databases free teachers and students 
to communicate electronically. Our en- 
tire country could be networked; teach- 
ers on the west coast could provide infor- 
mation for students on the east coast, 
and vice-versa. Electronic pen pals could 
work on small group projects together. 
Teachers may even now be able to sup- 
plement their lesson plans with informa- 
tion from teachers they have never met. 

It could be possible to link all state de- 
partments of education. Ohio's current 
major education project, for example, is 
to implement new minimum standards. 
Teachers in other states would be able to 
review these standards through a data- 
base, make comparisons to their own 
state standards, and draw their own con- 
clusions. Each state's educational theme 
could become a part of every state's ef- 
fort. No, I am not suggesting a federal 
system of education, but rather an op- 
portunity to share each state's ideas 
through electronic media. 

The ease with which one can become 
an information provider to a database 
convinces me this application has a major 
implication for the future of education. 
Yes, there will still be programming class- 
es, computer assisted instruction, and 
even games, but the database opens a 
new door to the computer literacy curri- 
culum. 

Next month: a summary of a major 
study on children and electronic text 
sponsored by The National Institute of 
Education. Does the "electronic text sys- 
tem represent a second electronic revo- 
lution in the industrialized nations?" 
Where are children using electronic text 
systems, and how? ■ ■ ■ 
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USER FRIENDLY USER FRIENDLY USER FRIENDLY USER FRIENDLY 
THREE NEW SYSTEMS FOR THE COLOR COMPUTER FROM 

CLOAD SYSTEMS 

P.O. BOX 12 OAK HARBOR OHIO 43449 

Calculator: Four Function, Scientific Notation, Negative Numbers Powers, 
E(Base 10), Trig. Functions, Per Cent, Sqr. Root, PI, Parentheses, 
and C/CE Key. One key entry. Template included. $14.95 

Chek-Tab: Call out checks by date or account, Automatic total for checks 
called. List all checks in order. Add, Void, Correct, or replace checks at 
anytime. For record keeping only. $ 9.95 

Electronic Formulas Multi-Page Menu, Temperature and Color Code 
Conversion and more. EF-1 $14.95 

Advanced Same as EF-1 but with 10-page Menu, Specialized formulas and 
built-in calculator. EF-2 $24.95 

Ohio residents add 5.5% sales tax. Available only on tape,16K ext. basic req. 

USER FRIENDLY USER FRIENDLY USER FRIENDLY USER FRIENDLY 




ttention 

L Subscribers! 

All correspondence concerning your subscription, i.e., 
changes of address, duplicate copies, etc. should be 
ent to Color Computer, PO Box 468, Hasbrouck 
Heights, NJ 07604. Please include your mailing 
label for speedy service. BACK ISSUES of Color 
Computer can be ordered by writing to Color 
Computer, Att: G. Purnell, Highland Mill, 
Camden, ME 04843. The price is $5 per copy 
and all are available except the April and 
May 83 issues. 
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HI-RES SCREEN UTILITY 
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ProeraMable line lengths 



i 28 to 255 characte 



28 Characters per I ine 
32 Characters per line 
36 Characters per line 
42 Characters per line 
51 Characters per line 
(*4 Character* per I ine 

Line leneths of 85.128 ft 255 are unreadable 
>1 ; can be uer>» useful For seeins display layout 



• FULLY BASIC COMPATIBLE 

• DISPLAY FORMATS OF 28 to 255 

CHARACTERS PER LINE 

• FULL 96 UPPER LOWER CASE CHARACTERS 

• MIXED GRAPHICS & TEXT OR SEPARATE 

GRAPHIC & TEXT SCREENS 

• INDIVIDUAL CHARACTER HIGHLIGHTING 

• REVERSE CHARACTER HIGHLIGHT MODE 

• WRITTEN IN FAST MACHINE LANGUAGE 

• AUTOMATIC RELOCATES TO TOP OF 16 32K 

• AUTOMATICALLY SUPPORTS 64K ol RAM 

WITH RESET CONTROL 

• REVERSE SCREEN 

» ON SCREEN UNDERLINE 



• DOUBLE SIZE CHARACTERS 

• ERASE TO END OF LINE 

• ERASE TO END OF SCREEN 

• HOME CURSOR 

• BELL TONE CHARACTER 

• HOME CURSOR & CLEAR SCREEN 

• REQUIRES ONLY 2K OF RAM 

• COMPATIBLE WITH ALL TAPE & 

DISK SYSTEMS 

S19.95 




Introducing The “Super Smart” 

DATA PACK n 

Terminal Communications Sotware 
“FEATURES” 




• No Lost Information When Using Hi-Resolution Display 
On Line 

• ASCII Compatible File Format 

• Full Text Buffering 

• Terminal Baud Rates 300 to 9600 

• Automatic Word Wrap Eliminates Split Words 

• Full/Half Duplex 

• Automatic File Capture 

• Programmable Word Length, Parity and Stop Bits 

• Save and Load Text Buffer and Program Key Buffers 
to Tape or Disk 

• 9 Fli-Resolution Display Formats. 28 to 255 x 24 

• True Upper/Lower Case Display 

• Kill Graphics Option for An Extra 6K 



• Supports Line Break 

• Freeze Display and Review Information On Line 

• Send Files Directory from Buffer or Disk 

• Full Disk Support for Disk Version 

• Send Control Codes from Keyboard 

• Separate Printer Baud Rates 1 10-9600 

• Display On Screen or Output Contents of Buffer to Printer 

• Automatic Memory Sense 16-64K 

• 9 Programmable Function Key Variable Length Macro Buffer 

• Programmable Prompt Character or Delay to Send Next Line 

• Programmable Control Character Trapping 

• Programmable Open /Close Buffer Characters 

• Automatic Key Repeat for Editing 

• Program fcnd Memory Status Displays 



DISK $44.95 
















TAPE $34.95 



i 



f / 



5566 Ricochet Avenue 
Las vegas, Nevada 89110 



/IC^.ACZ^ All Orders Shipped From stock 
|/Ufcl UOj4 Add $2.50 Postage 
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C C Term 

Turn your Color Computer 
into an inexpensive terminal. 




v 

/ \ 
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4K Color Basic 



EEN THINKING OF TRYING Com- 
puServe or a bulletin board ser- 
vice but don't want to invest in 
expensive software? Is your software in- 
adequate for communicating with your 
mainframe? Here is a program that will 
turn your Color Computer into a terminal 
suitable for telecommunications with 
any host computer. 

I wrote CCTerm to get around the limi- 
tations of Radio Shack's Videotex when 
I was working with the mainframe at my 
office. Videotex can't send a true break 
(a string of nulls) or a rubout (ASCII $7F), 
nor can it send or receive lowercase char- 
acters. My program will give you the full 
set of 128 ASCII characters (as shown in 
Table 1) and will also let you define the 
function of certain special keys on your 
keyboard. 

CCTerm does have limitations. It is a 
dumb terminal program, in that it will 
neither upload nor download files from 
the host, and it does not store any re- 
ceived data. Also, it retains the 32-char- 
acter-per-line display. However, features 
could easily be added if you have the 
memory and an assembler. 

Understanding Serial 

To understand how the program works, 
a review of serial telecommunications is 
in order. When two computers commu- 
nicate over the telephone, two lines are 
available, one for each system to trans- 
mit on. Binary words must be sent se- 
rially, i.e., one bit at a time, one after the 
other. The actual conversion of binary in- 
formation to tones on the telephone line 
is accomplished by a device called a mo- 
dem (modulator/demodulator). So, you 
must have a modem, in addition to the 
terminal software program, to commu- 
nicate over the phone. 

RS-232 is the recognized standard for 
serial communications between a com- 
puter and a peripheral (such as a mo- 
dem). The format for a typical serial word . 
is shown in Figure 1 . It normally consists 
of one start bit, seven data bits (eight for 
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graphics), a parity bit and a stop bit. The 
time length of each bit is determined by 
the data rate. Therefore, 300 baud (the 
most common rate) defines one bit as 
being 3.33 ms (milliseconds) long. One 
1 0-bit serial word would require 33.3 ms 
for transmission. 

Parity is used to check the validity of re- 
ceived data. Parity may be defined as 
even or odd, and refers to the number of 
high bits (binary 1) in a word. For exam- 
ple, binary 1001000 (ASCII character h) 
has an even number of high bits. For 
even parity, the parity bit would be set 
low, and set high for odd parity. 

The Program 

The most common RS-232 combina- 
tion in use today (including CompuServe 
and most bulletin boards) is 300 baud 
with even parity at full duplex. (Full du- 
plex simply means that both systems can 
transmit data to the other at the same 
time.) CCTerm is set up to function in just 
that way (although you can change the 
parity and duplex if necessary). You can- 
not change the baud rate (if you want to 
work at 600 baud or higher, the cost of 
your software is not your big expense, 
anyway). 

Radio Shack did not include a UART 
(Universal receiver/transmitter) or an ACIA 
(asynchronous communications interface 
adaptor) in the Color Computer. Either 
of these devices would automatically 



Figure 1. RS-232 Serial Format (300 Baud) 



handle all of the serial timing problems. 
Instead, the serial words must be created 
by the Color Computer's software and 
transferred one bit at a time via the pe- 
ripheral interface adaptor (PIA). 

In the Color Computer the RS-232 in- 
put is connected to bit zero of address 
$FF22, while RS-232 output is on bit one 
of $FF20. The software must read from 
or write to the PIA every 3.33 ms while 
manipulating a serial word to maintain 
the correct baud rate. Because the 6809E 
microprocessor runs at 1.12 microsec- 
onds per cycle, it has plenty of time to ex- 
ecute thousands of cycles between the 
transmission of each bit. 

The program remains in a short execu- 
tive loop, continuously looking for a key 
pressed on the keyboard or the start bit 
of an incoming word. When either is de- 
tected the program branches to the ap- 
propriate subroutine to receive the ASCII 
word and display it on the screen, or 
transmit the character at the proper 
baud and parity. 

Subroutine Sender rolls each bit in suc- 
cession into the bl position for output to 
address $FF20. Subroutine Recv reads 
from address $FF22 and rolls bO into the 
carry bit. Each bit is rolled into memory 
from the carry sequentially to build up 
the complete word. 

If you have disassembled your Basic 
ROM (or read Jake Commander's article 
in The Color Computer Magazine, July 
83), you will notice a similarity between 
the Polcat and Chrout subroutines in this 
program and those in the ROM. I have 
downloaded these routines to modify 
them for adaptability to this program. 
Because we already own the ROM, and 



SEND A 7 BIT ASCII CHAR. H 
EVEN PARITY- STOP BIT 
H = 48 16 = 1001000 2 
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SUPER SCREEN 




A big 51 character by 24 line screen. 
Full upper and lower case characters. 
Easily combine text with hi-res 
graphics. 

PRINT @ is completely functional on 
the big screen. 

The powerful ON ERROR GOTO is 
fully implemented. 



Auto-key repeat for greater keyboard 
convenience. 

Control codes foradditional functions. 
Works with 16K, 32K or 64K com- 
puters. 

Available on disc or cassette. 

Works with extended and/or disc 
BASIC. 



51 CHARACTERS BY 24 LINE DISPLAY 

Super Screen is a powerful, machine language program that significantly upgrades 
the performance and usefulness of 16K or greater, Extended and Disc Basic Color 
Computers. The standard Color Computer display screen is totally inadequate for 
serious, personal or business applications so Super Screen replaces it with a brand 
new, 51 character wide by 24 line screen including full upper and lower case 
characters. Instead of a confusing checkerboard appearance, you now have true 
lower case letters along with a screen that is capable of displaying 1224 characters 
The difference is startling! Your computer takes on new dimensions and can easily 
handle lines of text that were simply too long and complex to display on the old 
screen. 

COMBINE TEXT WITH HI-RES GRAPHICS 

You can now write truly professional looking programs that combine text with hi-res 
graphics. Super Screen allows you to create graphics displays with the Basic LINE. 
DRAW and CIRCLE statements and then notate the graphics with descriptive text. 
You can even use PRINT @ if you wish for greater programming convenience. Super 
Screen's versatility will amaze you. 

PRINT @ IS FULLY IMPLEMENTED 

The PRINT @ statement is a valuable asset to the programmer when formatting text 
on the screen. The standard Color Computer will report an error if you specify a 
location higher than 511 but Super Screen allows locations all the way to 1223! You 
get a big screen and a powerful formatting tool as well. Of course, Super Screen also 
supports the CLS command allowing you toclearthe big screen using standard Basic 
syntax 

ON ERROR GOTO 

That's right! Super Screen gives you a full implementation of ON ERROR GOTO 
including the ERR and ERL functions. Now you can trap errors and take corrective 
action to prevent crashed programs and lost data using the same standard syntax as 
other computers. The ON ERROR GOTO capability overcomes a serious deficiency 
of Color Computer Basic and great'y improves your capability to handle 
sophisticated tasks. All well written, user friendly' programs use error trapping 
techniques and yours can too! Now that’s power! 

AUTO KEY REPEAT 

No more frustration as you edit a long line in your Basic program; just hold the space 
bar down and automatically step to the desired position in the line. Need a line of 
asterisks? Hold the key down and auto repeat will give them to you. Those of you who 
spend many hours at your keyboard will appreciate this outstanding addition to Super 
Screen’s long list of impressive capabilities. 

CONTROL CODES FOR ADDITIONAL FUNCTIONS 

Super Screen recognizes several special control code characters that allow selection 
of block or underline, solid or blinking cursor and other functions. You can Home Up’ 
the cursor or you may erase from the cursor to the end of a line or to the end of the 
screen just like many other computers. These special codes give you an extra 
dimension of versatility and convenience that put Super Screen in a class by itself 

AND MORE GOOD NEWS... 

Super Screen comes with complete, well detailed instructions and is available on 
cassette or disc. It adjusts automatically to any 1 6K or greater, Extended or Disc Basic 
Color Computer or TDP-100 and uses only 2K of memory in addition to the screen 
memory reserved during power up. Guaranteed to be the most frequently used 
program in your software library. . .once you use it, you won’t be without it! Super 
Screen’s low price will really please you; only $29.95 on cassette or $32.95 on disc! 




64K Memory Expansion Kit 

All parts and complete instructions 

$64.95 



ACCOUNTING SYSTEM 

The Mark Data Products accounting system is ideal for the small businessman 
needing a fast, efficient means to process income and expenses, prepare detailed 
reports and maintain most of the information required at tax time. The system is a 
family of programs which operate by means of a "menu" selection scheme. When the 
operator selects a task to perform, the computer loads a program designed to handle 
that task from the system disc. The system disc contains all of the programs required 
to create, update and maintain data files and prepare the necessary accounting 
reports including a transaction journal, a P&L or income report, an interim or trial 
balance and a balance sheet 

Up to 255 separate accounts may be defined and a single disc system can hold over 
1.400 transactions. This system automatically enhances the monitor screen to a 51 
character by 24 line display. 32K of memory is required along with an 80-column 
printer and one or more disc drives. 

The MDP system: 

• Is accurate, user friendly and simple to use. 

• Is easy to customize for specific user requirements 

• Immediately updates the chart of accounts. 

• Provides an audit trail 

• Includes end of period procedures. 

• Is capable of future expandability. 

This accounting software equals or exceeds higher priced packages for other 
computers and includes a detailed operating manual. 

Requires 32K and a Single Disc Drive 
PRICE: $99 95 



ORDER ENTRY SYSTEM 

The Mark Data Products sales order processing system provides a fast, efficient 
means to enter orders, print shipping papers and invoices, prepare sales reports, and 
monitor receivables. The system automatically enhances the monitor screen to a 51 
character by 24 line display. 32K of memory is required along with an 80-column 
printer, and one or more disc drives. 

The MDP order entry system is a family or programs which operate interactively by 
means of a "menu'' selection scheme Up to 900 products may be defined and a single 
disc system can hold over 600 transactions When the operator selects a task to be 
performed, the computer loads a program designed to handle that task from the 
system disc The system disc contains all of the programs required to create, update 
and maintain data files and prepare the necessary paperwork including shipping and 
invoice forms, daily sales reports, a monthly (or other period) sales report and a 
receivables report 

The MDP system: 

• Is accurate, user friendly and simple to use 

• Is easy to customize for specific user requirements. 

• Produces a traceable invoice. 

• Handles receivables as well as closed orders. 

• Is capable of future expandability. 

This order entry software equals or exceeds higher priced packages for other 
computers and includes a detailed operating manual 

Requires 32K and a Single Disc Drive 
PRICE: $99 95 



THE MARK DATA PRODUCTS 

SUPER PRO KEYBOARD. 

The most popular replacement keyboard for your CoCo. 

• Original key layout. 

• No special software required. 

• Fast, simple installation— no soldering 

• Individually boxed with full instructions. 

• Professional, low profile, finished appearance 

• U S. made— high quality, quad gold contacts. 

• Smooth "Touch Typist" feel— no sagging 



Only $69.95 



IMPORTANT NEW BOOKS 

"Your Color Computer" by Doug Mosher. Over 300 pages of detailed information— 
A CoCo encyclopedia $12.95 

"Programming the 6809 " by Rodnay Zaks and William Labiak One of the best 6809 
machine language texts available— required reference material $15 95 



WE STOCK SOFTLAW PRODUCTS 

The VIP WRITER Text Processor is rated tops by Rainbow. Hot CoCo and Color 
Computer Magazine. After evaluation we rate it tops too Disc $59.95. 



Mark Data Products 



24001 ALICIA PKvX/Y., NO. 207 • MISSION VIEJO, CA 92691 • (714) 768-1551 



All Orders: Please add $2.00 shipping and handling in the continental U S All others, add air shipping and $3.00 handling California residents add 6% sales tax Foreign orders 
please remit U S. funds. Software authors— Contact us for exciting program marketing details. We accept MasterCard and VISA. Distributed in Canada by Kelly Software 
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Bits4 through 6 
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Bits 0 through 3 
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HT EM 
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z 
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[ 
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Table 1. ASCII Character Set 



because we are not reselling the soft- 
ware, we are not violating any copy- 
rights. I'm merely showing you how to 
modify the routines for your own, per- 
sonal use. 

The Polcat code was modified to in- 
clude a control key function (the Down 
Arrow). This key acts like the shift key to 
send the control characters A-Z by simul- 
taneously pressing the Down Arrow and 
the desired key. Also, the keyboard table 
is now available for modification to send 
any character you desire. By comparing 
the keyboard table in the Program Listing 
to the key function chart in Table 2 you 
can see how this is accomplished. I have 
set up the special keys to return certain 
ASCII values. For example, the Left Arrow 
key now returns a rubout ($7F) instead of 
a backspace ($08). To send a backspace 
just key the control key and h. The Break 
key value was changed to flag a special 
break routine (long null) instead of con- 
trol key and c. 

Upon assembly or POKEing the pro- 
gram, you may make any changes to the 
table you desire. You might want to add 
an escape key (ASCII $ 1 B) to the table, 
say on the shifted Break key at address 
$3F54. CompuServe, for example, does 
not use a true break but uses control c. 
You could then change the value in ad- 
dress $3F53 from $80 to $03 if you were 



only going to work with them. Complete 
uppercase and lowercase is available and 
is selected by hitting the shift and zero 
keys as always. 

For the display, the ROM Chrout rou- 
tine also required modification to speed 
up the scrolling function to solve some 
timing problems. And in addition, I have 



selected a black screen with green letters 
(personal preference). I can achieve a 
crisp monotone display on my color TV 
by turning off the color and readjusting 
the TV controls for a very readable dis- 
play. If you prefer the green screen/black 
letters, the program is easily changed. 
Replace the eora #$40 instruction at label 
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JFD-COCO DISC SYSTEM — $389 



/ / / / i i 

J & M Systems, Ltd. is a leader in the Model III 
marketplace with our JFD-III Disc Controller. With 

thousands in operation, we have set new standards 

in controller performance and reliability. We bring 
these same high standards to the COCO, resulting 
in the highest quality disc controller system on the 
market. Compare these functions before you buy: 

• Price. $389 includes controller, first drive, disc n r'" 3 

basic in ROM, and manuals. Just plug it in. 

• Never needs adjusting. Our exclusive Digital Ir* 3 *** 

/ Phase Lock Loop Data Separator and Digital Pre- j fl 

x comp Circuit eliminates the 3 adjustments found Lj'lf ” 

on other controllers. / _____ 

• High quality standard production disc drives. For T HmUtlHfll! 

- improved service and reliability. Tandon & Teac — 

drives provide twice the read sensitivity that the 
drives found in other disc systems do, and hold 
their alignment far longer. / 

• Gold-plated card edge connectors throughout. 

• Software compatible with Radio Shack Disc 

Basic, Flex, and OS/9. j 

J & M Systems, Ltd., 137 Utah NE, Albuquerque, N.M. 87108 
(505) 265-1501 / I 



J&M SYSTEMS, LTD. 




Key 


ASCII (hex) 


Symbol 


Function 




5E 




— 


shift 


5F 




underescore 




00 


cntl 


control key 


shift 


5B 


[ 


— 




7F 


rub 


char, delete 


shift 


18 


cntl-X 


line delete 




09 


cntl-l 


tab 


shift 


5D 


] 


— 


SPACEBAR 


20 




space 


0 


30 


0 


— 


shift 0 


12 


cntl-R 


case switch 


ENTER 


0D 


cntl-M 


carr. ret. 


CLEAR 


OC 


cntl-L 


form feed 


shift dear 


5C 




backslash 


BREAK 


80 




break 


shift BREAK 


80 




break 


@ 


40 


@ 


— 


shift @ 


13 


cntl-S 


pause 



Table 2. CC Term Key Functions 



B6 (address $3FBB) with two NOPs ($ 12 ). 
Then change all $20 to $60 at addresses 
$3DDD, $3F84, $3F90, $3FCF, S3FD0 
and $3FD9 (the code for "space"). Then 
change the cursor value at address $3FE0 
to$7F, also. 

Finally, to switch from the default con- 
ditions of even parity or full duplex, 
change the value stored at label Duplex 
or Parity (address $3E1E or $3E1F) from 
$0 to $ff in subroutine Sender. No re- 
assembly would be required. 

Assembling and Running 

As assembled, a 16K machine is re- 
quired. However, because the program 
takes only 533 bytes and the code is re- 
locatable, it can easily be loaded into a 
4K machine. Once the machine code is 
loaded, be sure to double check your typ- 
ing and then save to tape or disk before 
running. To begin, enter exec&H 3 DD 0 . The 
screen will clear and the message place 
call will appear. This is your cue to dial 
your host computer and turn on the mo- 
dem. The program is already in its execu- 
tive loop and is ready to send and receive. 
You will need to be familiar with the op- 
erating instructions of your host to con- 
tinue. To exit the program, just reset the 
Color Computer. Be sure to log off from 
your host first! ■ ■ ■ 
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EDUCATIONAL SOFTWARE 

DR. STAN - uses a new learning concept to teach spelling • it uses the child’s spelling 
list • field tested, 85% success rate. Req. 16K. 

Cassette: $39.95 Disk: $45.95 

BASIC MATH - helps teach how to add, subtract, multiply, divide. Req. 16K. 

Cassette: $19.95 Disk: $25.95 

DR. ADLIB — helps teach parts of speech and reinforces by using them in sentences created 
by the child. Req. 16K. Cassette: $19.95 Disk: $25.95 

HAROLD’S CASTLE - Non-graphic adventure game which encourages logical thinking 

and imagination. 32K Req. 

Cassette: $19.95 Disk: $25.95 

All programs user friendly and in BASIC. 

DEE PEE DATA 
P.O. Box 11349 
Columbia, SC 29211 




24 HR. - TOLL FREE: 1-800-327-0560 in FL: 1-800-432-8859 
(on a touch tone phone dial ext: 1520) 

• Dealer and author inquiries welcome! 

COD ORDERS PLEASE ADD $2 
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Program Listing. CC Term 



3DD0 

3DD0 

3DD2 

3DD4 

3DD7 

3DDA 



3DDC 

3DDE 

3DE0 

3DE3 

3DE5 

3DE9 

3DEB 

3DED 

3DF1 

3DF4 

3DF6 



3E00 



3E02 
3E0 5 
3E07 
3E09 
3E0C 
3E0E 
3E10 
3E11 
3E13 



3E14 

3E17 

3E19 

3E1B 







00001 


* 


CCTERM 






3E83 


81 


00 






00002 


* 








3E85 


27 


07 






00003 


* TERMINAL 






3E87 


81 


7F 






00004 


* COMMUNICATIONS 




3E89 


27 


03 






00005 


* FOR THE TRS80C 




3E8B 


17 


00E7 






00006 


* 


BY 






3E8E 


39 








00007 


* R. W. 


CAMPBELL 














00008 


* 


















00009 


* 300 BAUD 
















00010 


* PULL 


DUPLEX 






3E8F 


35 


94 






00011 


* EVEN 


PARITY 






3E91 


34 


54 






00012 


* 








3E93 


8D 


03 




PP20 


00013 


PIAOUT 


EQU 


$FF20 




3E95 


4D 






PP22 


00014 


PIAIN 


EQU 


$FP22 




3E96 


35 


D4 






00015 


* 








3E98 


CE 


FP00 






00016 




ORG 


$3DD0 




3E9B 


8E 


0152 


1A 


50 


00017 


START 


ORCC 


#$50 




3E9E 


4F 




86 


PF 


00018 




LDA 


#$FF 




3E9P 


4A 




B7 


PP20 


00019 




STA 


PIAOUT 


RS232 OUT SET HIGH 


3EA0 


34 


12 


8E 


0400 


00020 




LDX 


#$400 




3EA2 


A7 


42 


9P 


88 


00021 




STX 


<$88 


BEGIN VIDEO ADDRESS 


3EA4 




21 






00022 


* 








3EA5 




53 






00023 


♦CHANGE 


$20 TO 


$60 




3EA6 


69 


42 






00024 


*IN NEXT LINE TO 




3EA8 


24 


E5 






00025 


♦INVERT 


VIDEO 






3EAA 


6C 


60 






00026 


* 








3EAC 


8D 


60 


86 


20 


00027 




LDA 


#$20 


CLEAR SCREEN 


3EAE 


A7 


61 


A7 


80 


00028 


CLEAR 


STA 


r X + 










8C 


0600 


00029 




CMPX 


#$600 


END OP SCREEN? 









26 

30 

A6 

81 



P9 

8D 000D 
80 
04 



1027 016P 
17 0181 

20 P3 

504C41434520 

43414C4C 

0D04 



00030 

00031 

00032 

00033 

00034 

00035 

00036 

00037 

00038 



LOOP1 



MSGl 



BNE 

LEAX 

LDA 

CMPA 

LBEQ 

LBSR 

BRA 

PCC 



17 

81 

26 

7F 

86 

8D 

4A 

2A 

39 



8E 

30 

26 

39 



008C 

80 

0A 

FP20 

09 

04 

PB 



0146 

82 

PC 



00039 FDB 

00040 * 

00041 *POLL ROUTINE 

00042 * 

00043 POLL LBSR 

00044 CMPA 

00045 BNE 

00046 CLR 

00047 LNGTIM LDA 

00048 BRK BSR 

00049 DECA 

00050 BPL 

00051 NOBRK RTS 

00052 * 

00053 *3.3 MSEC TIME 

00054 * 

00055 TIMER LDX 

00056 TIMERX LEAX 

00057 BNE 

00058 RTS 

00059 * 



CLEAR 

MSG1 / PCR GET MSG ADDR 

,X+ PRINT MSG1 

#4 DONE? 

EXEC GOTO EXECUTIVE 

CHROUT 

LOOPl UNTIL MSG DONE 
/PLACE CALL/ 



$0D04 CR , END 



POLCAT 

#$80 

NOBRK 

PIAOUT 

#9 

TIMER 

BRK 



GO TO KEYBOARD 
BREAK PRESSED? 



SET NULL OUT 
COUNTER 



#$146 

,-x 

TIMERX 



WAIT 10 BITS, THEN A=$FF 



DECR X 



3EB0 


A8 


00 


3EB2 


A4 


00 


3EB4 


E6 


61 


3EB6 


E7 


80 


3EB8 


4D 




3EB9 


27 


EA 


3EBB 


E6 


42 


3EBD 


E7 


62 


3EBF 


C6 


F8 


3EC1 


CB 


08 


3EC3 


44 




3EC4 


24 


FB 


3EC6 


EB 


60 


3EC8 


27 


4F 


3ECA 


Cl 


1A 


3ECC 


22 


4D 


3ECE 


17 


0086 


3ED1 


27 


0D 


3ED3 


CA 


40 


3ED5 


8D 


2C 


3ED7 


27 


07 


3ED9 


B6 


011A 


3EDC 


26 


02 


3EDE 


CA 


20 


3EE0 


E7 


60 


3EE2 


BE 


011B 


3EE5 


17 


FF2F 


3EE8 


C6 


FF 


3EEA 


8D 


20 


3EEC 


4C 




3EED 


26 


06 



00121 




CMPA 


#0 


NULL? 


00122 




BEQ 


DONE 




00123 




CMPA 


# $7F 


RUBOUT? 


00124 




BEQ 


DONE 




00125 




LBSR 


CHROUT 


PUT ON SCREEN 


00126 


DONE 


RTS 






00127 


* 








00128 


♦KEYBOARD POLL 






00129 


* 








00130 


L3 


PULS 


PC ,X ,B 




00131 


POLCAT 


PSHS 


U , X , B 


ENTRY POINT 


00132 




BSR 


LI 


CHECK KYBD 


00133 




TSTA 






00134 




PULS 


PC,U,X, 


B 


00135 


LI 


LDU 


#$FF00 


PI A ADDRESS 


00136 




LDX 


#$152 


ROLLOVER BITS 


00137 




CLRA 






00138 




DECA 






00139 




PSHS 


X , A 




00140 




STA 


2 t U 


SET COLUMN BIT 


00141 




FCB 


$21 




00142 


LX 


FCB 


$53 


COMB OPCODE 


00143 




ROL 


2 , U 




00144 




BHS 


L3 


ALL COLS CHECKED? 


00145 




INC 


0,S 




00146 




BSR 


L4 




00147 




STA 


i,s 





00148 


EORA 


0,X 


MAKE ROLLOVER BITS 


00149 


ANDA 


0,X 




00150 


LDB 


l f S 




00151 


STB 


,x+ 




00152 


TSTA 






00153 


BEQ 


LX 




00154 


LDB 


2 , U 




00155 


STB 


2 , S 


SAVE FOR BOUNCE CHECK 


00156 


LDB 


#$F8 




00157 L5 


ADDB 


#8 




00158 


LSRA 






00159 


BHS 


L5 


GET CHAR. 


00160 


ADDB 


0,S 




00161 


BEQ 


L6 




00162 


CMPB 


# $ 1A 


CHAR > Z? 


00163 


BHI 


L7 


YES, GO TO TABLE 


00164 


LBSR 


CNTL 


CNTL KEY DOWN TOO? 


00165 


BEQ 


LXl 


YES 


00166 


ORB 


#$40 


NO, ADD OFFSET 


00167 


BSR 


L8 


SHIFT ALSO? 


00168 


BEQ 


LXl 


YES 


00169 


LDA 


$ 1 1 A 


CHECK CASE 


00170 


BNE 


LXl 


UPPER CASE ONLY 


00171 


ORB 


#$20 


ADD LOWER CASE OFFSET 


00172 LX1 


STB 


0,S 


SAVE KEY 


00173 


LDX 


$ 1 IB 


KYBD DEBOUNCE DELAY 


00174 


LBSR 


TIMERX 




00175 


LDB 


# $FF 




00176 


BSR 


L9 




00177 


INCA 






00178 


BNE 


L10 






Color Computer/59 





00060 


♦SENDER SUBROUTINE 




00061 


* 


3E1C 


00062 


WRDOUT RMB 1 


3E1D 


00063 


OUTCNT RMB 1 




00064 


* 




00065 


*TO SET ODD PARITY 




00066 


♦OR HALP DUPLEX 




00067 


♦CHANGE 0 TO $PF 




00068 


♦AT THAT LABEL 




00069 


* 



3E1E 




00 


00070 


PARITY 


FCB 


0 


SETS EVEN PARITY 


3E1F 




00 


00071 


DUPLEX 


FCB 


0 


SETS FULL DUPLEX 


3E20 


A7 


8C F9 


00072 


SENDER 


STA 


WRDOUT 


, PCR SAVE OUTPUT CHAR. 


3E23 


6D 


8C F9 


00073 




TST 


DUPLEX 


, PCR 


3E26 


27 


03 


00074 




BEQ 


SKIPR 


IF FULL DUPLEX 


3E28 


17 


01 4 A 


00075 




LBSR 


CHROUT 


IF HALF DUPLEX 


3E2B 


86 


08 


00076 


SKIPR 


LDA 


#8 


BIT COUNT 


3E2D 


A7 


8C ED 


00077 




STA 


OUTCNT 


, PCR 


3E30 


4F 




00078 




CLRA 




SET START BIT 


3E31 


5F 




00079 




CLRB 




PARITY CHECKER 


3E32 


6D 


8C E9 


00080 




TST 


PARITY 


, PCR 


3E35 


27 


01 


00081 




BEQ 


LOOPA 


IF EVEN PARITY 


3E37 


53 




00082 




COMB 




IF ODD PARITY 


3E38 


B7 


FF20 


00083 


LOOPA 


STA 


PIAOUT 


SEND BIT 


3E3B 


66 


8C DE 


00084 




ROR 


WRDOUT 


, PCR PUT FIRST BIT IN CARRY 


3E3E 


24 


01 


00085 




BHS 


SKIPB 


IS IT A 1? 


3E40 


53 




00086 




COMB 




SET/UNSET FOR PARITY 


3E41 


49 




00087 


SKIPB 


ROLA 






3E42 


49 




00088 




ROLA 




CARRY INTO BIT 1 


3E43 


8D 


CF 


00089 




BSR 


TIMER 


TIME IT OUT 


3E45 


6A 


8C D5 


00090 




DEC 


OUTCNT 


, PCR ALL BITS SENT? 


3E48 


26 


EE 


00091 




BNE 


LOOPA 


NO 








00092 


♦FIRST 


8 BITS 


SENT 




3E4A 


86 


FF 


00093 




LDA 


#$FF 


STOP BIT 


3E4C 


F7 


FF20 


00094 




STB 


PIAOUT 


PARITY BIT 


3E4F 


8D 


C3 


00095 




BSR 


TIMER 




3E51 


B7 


FF20 


00096 




STA 


PIAOUT 


SEND STOP 


3E54 


8D 


BE 


00097 




BSR 


TIMER 




3E56 


6D 


8C C6 


00098 




TST 


DUPLEX 


, PCR 


3E59 


27 


02 


00099 




BEQ 


SENT 


IF FULL DUPLEX 


3E5B 


8D 


AF 


00100 




BSR 


LNGTIM 


SKIP ANY ECHO 


3E5D 


39 




00101 


SENT 


RTS 












00102 


* 














00103 


♦RECEIVE SUBROUTINE 










00104 


* 








3E5E 






00105 


WRDIN 


RMB 


1 




3E5F 






00106 


BITCNT 


RMB 


1 




3E60 


6F 


8C FB 


00107 


RECV 


CLR 


WRDIN, 


PCR 


3E63 


C6 


07 


00108 




LDB 


#7 


COUNTER 


3E65 


E7 


8C F7 


00109 




STB 


BITCNT 


, PCR 


3E68 


8E 


0190 


00110 




LDX 


#$190 


GO TO MIDDLE . . . 


3E6B 


8D 


AA 


00111 




BSR 


TIMERX 


. . OF FIRST WORD BIT 


3E6D 


B6 


FF22 


00112 


LOOPB 


LDA 


PI AIN 


RS232IN, GET THE BIT 


3E70 


47 




00113 




ASRA 




PUT BIT IN CARRY 


3E71 


66 


8C EA 


00114 




ROR 


WRDIN, 


PCR SAVE IT 


3E74 


8D 


9E 


00115 




BSR 


TIMER 


WAIT FOR NEXT BIT 


3E76 


6A 


8C E6 


00116 




DEC 


BITCNT 


, PCR 


3E79 


26 


F2 


00117 




BNE 


LOOPB 


UNTIL 7 BITS READ 


3E7B 


66 


8C E0 


00118 




ROR 


WRDIN, 


PCR NOW @ MIDDLE OF PRTY BIT 


3E7E 


A6 


8C DD 


00119 




LDA 


WRDIN, 


PCR GET RECEIVED WORD 


3E81 


84 


7F 


00120 




ANDA 


#$7F 


ERASE PARITY 



3EEF 


E6 


62 


00179 LP2 


LDB 


2,S 




3EF1 


8D 


19 


00180 


BSR 


L9 


CHECK AGAIN 


3EF3 


Al 


61 


00181 


CMPA 


i,s 


SAME KEY? 


3EF5 


35 


02 


00182 L10 


PULS 


A 




3EF7 


26 


07 


00183 


BNE 


Lll 


NO, SKIP 


3EF9 


81 


12 


00184 


CMPA 


#$12 


SHIFT 0? 


3EFB 


26 


04 


00185 


BNE 


LI 2 


NO 


3EFD 


73 


011A 


00186 


COM 


$11A 


YES, TOGGLE 


3F00 


4F 




00187 Lll 


CLRA 






3F01 


35 


90 


00188 L12 


PULS 


PC,X 




3F03 


86 


7F 


00189 L8 


LDA 


#$7F 


CHECK FOR SHIFT 


3F05 


A7 


42 


00190 


STA 


2,U 


SET COL. 8 


3F07 


A6 


40 


00191 


LDA 


0,U 


CHECK ROWS 


3F09 


84 


40 


00192 


ANDA 


#$40 


A=0 IF SHIFT PRESSED 


3F0B 


39 




00193 


RTS 






3F0C 




E7 


00194 L9 


FCB 


$E7 




3F0D 




42 


00195 LP1 


FCB 


$42 


FORMS STB 2 ,U 


3F0E 


A6 


40 


00196 L4 


LDA 


0,U 




3F10 


8A 


80 


00197 


ORA 


#$80 




3F12 


6D 


42 


00198 


TST 


2 ,U 




3F14 


2B 


02 


00199 


BMI 


L13 




3F16 


8A 


CO 


00200 


ORA 


#$C0 




3F16 


39 




00201 LI 3 


RTS 






3F19 


C6 


33 


00202 L6 


LDB 


#$33 




3F1B 


30 


8C EF 


00203 L7 


LEAX 


LP1 , PCR 


TABLE OFFSET 


3F1E 


Cl 


21 


00204 


CMPB 


#$21 




3F20 


25 


16 


00205 


BLO 


LI 4 




3F22 


30 


8C CA 


00206 


LEAX 


LP2 ,PCR 


TABLE OFFSET 


3F25 


Cl 


30 


00207 


CMPB 


#$30 




3F27 


24 


OF 


00208 


BHS 


LI 4 




3F29 


8D 


D8 


00209 


BSR 


L8 




3F2B 


Cl 


2B 


00210 


CMPB 


#$2B 




3F2D 


23 


02 


00211 


BLS 


L15 




3F2F 


88 


40 


00212 


EORA 


#$40 




3F31 


4D 




00213 L15 


TSTA 






3F32 


27 


AC 


00214 


BEQ 


LX1 




3F34 


CB 


10 


00215 


ADDB 


#$10 




3F36 


20 


A8 


00216 


BRA 


LXl 




3F38 


58 




00217 L14 


ASLB 






3F39 


8D 


C8 


00218 


BSR 


L8 


CHECK SHIFT 


3F3B 


26 


01 


00219 


BNE 


L16 


NONE 


3F3D 


5C 




00220 


INCB 




INCR TABLE OFFSET 


3F3E 


E6 


85 


00221 L16 


LDB 


B,X 


GET TABLE VALUE 


3F40 


20 


9E 


00222 


BRA 


LXl 


SEND CHAR. 








00223 * 














00224 *KEYBOARD TABLE 












00225 * 








3F42 




00 


00226 


FCB 


0 




3F43 




5E5F 


00227 


FDB 


$5E5F 


UP ARROW, SH UP ARROW 


3F45 




005B 


00228 


FDB 


$005B 


DN ARROW, SH DN ARROW 


3F47 




7F18 


00229 


FDB 


$7F18 


L ARROW, SH L ARROW 


3F49 




095D 


00230 


FDB 


$095D 


R ARROW, SH R ARROW 


3F4B 




2020 


00231 


FDB 


$2020 


SPACEBAR 


3F4D 




3012 


00232 


FDB 


$3012 


ZERO, SH ZERO 


3F4F 




0D0D 


00233 


FDB 


$0D0D 


ENTER, SH ENTER 


3F51 




0C5C 


00234 


FDB 


$0C5C 


CLEAR, SH CLEAR 


3F53 




8080 


00235 


FDB 


$8080 


BREAK, SH BREAK 


3F55 




4013 


00236 


FDB 


$4013 


@ , SH @ 








00237 * 








3F57 


86 


EF 


00238 CNTL 


LDA 


# $EF 


CNTL KEY CHECK 


3F59 


A7 


42 


00239 


STA 


2 , U 


SET KYBD COL. 5 


3F5B 


A6 


40 


00240 


LDA 


0,U 


CHECK ROWS 




60/March 1984 



3F5D 


84 


08 


00241 




ANDA 


#8 


A=0 IF CNTL PRESSED 












3F5F 


39 




00242 




RTS 






3FB0 A 7 


80 


00304 


STA 


,X+ SCREEN IT 








00243 


* 








3FB2 9F 


88 


00305 B3 


STX 


<$88 CURSOR POSITION 








00244 


*EXEC ROUTINE 






3FB4 5F 




00306 


CLRB 


SET SCROLL FLAG 








00245 


* 








3FB5 8C 


05FF 


00307 


CMPX 


# $ 5FF END OF SCREEN? 


3F60 


17 


FE9F 


00246 


EXEC 


LBSR 


POLL 


LOOK AT KYBD 


3FB8 23 


IE 


00308 


BLS 


B2 NO SCROLL 


3F63 


81 


00 


00247 




CMPA 


#0 


GOT ONE? 






00309 * 






3F65 


27 


03 


00248 




BEQ 


SKIPX 


NO 


3FBA 8E 


0400 


00310 


LDX 


#$400 SCROLL 


3F67 


17 


FEB6 


00249 




LBSR 


SENDER 


YES , SEND IT 


3FBD EC 


88 20 


00311 B8 


LDD 


$20 ,X GET NEXT LINE. . 


3F6A 


B6 


FF22 


00250 


SKIPX 


LDA 


PIAIN 


CHECK INCOMING 


3FC0 EE 


88 22 


00312 


LDU 


$22, X ..4 BYTES AT A TIME 


3F6D 


47 




00251 




ASRA 




PUT IN CARRY 


3FC3 ED 


81 


00313 


STD 


,X++ MOVE UP ONE LINE 


3F6E 


25 


F0 


00252 




BLO 


EXEC 


INPUT HIGH? 


3FC5 EF 


81 


00314 


STU 


,X++ 


3F70 


17 


FEED 


00253 




LBSR 


RECV 


NO, GET INCOMING 


3FC7 8C 


05E0 


00315 


CMPX 


#$5E0 NEXT TO LAST LINE? 


3F73 


20 


EB 


00254 




BRA 


EXEC 




3FCA 25 


FI 


00316 


BLO 


B8 NOT YET 








00255 


* 








3FCC 9F 


88 


00317 


STX 


<$88 LAST SCREEN LINE 








00256 


* OUTPUT TO SCREEN 








00318 * 












00257 


♦(INVERTED CHAR.) 








00319 *CHANGE 


$20 TO 


$60 








00258 


* 












00320 *IN NEXT LINE 


TO 


3F75 


34 


16 


00259 


CHROUT 


PSHS 


A,B,X 








00321 *INVERT 


VIDEO 




3F77 


5F 




00260 




CLRB 




SET SCROLL FLAG 






00322 * 






3F78 


9E 


88 


00261 




LDX 


<$88 


CURSOR POSITION 


3FCE CC 


2020 


00323 


LDD 


#$2020 CLEAR TO END.. 


3F7A 


81 


08 


00262 




CMPA 


#8 


BACKSPACE? 


3FD1 ED 


81 


00324 B9 


STD 


,X++ 


3F7C 


26 


OB 


00263 




BNE 


Bl 




3FD3 8C 


0600 


00325 


CMPX 


#$600 . .OF LAST LINE. . 


3F7E 


8C 


0400 


00264 




CMPX 


#$400 


TOP OF SCREEN? 


3FD6 25 


F9 


00326 


BLO 


B9 ..UNTIL DONE 


3F81 


27 


55 


00265 




BEQ 


B2 


THEN DONE 






00327 * 












00266 


* 












00328 *CHANGE 


$20 TO 


$60 








00267 


♦CHANGE 


$20 TO 


$60 








00329 *IN NEXT LINE 


TO 








00268 


♦IN NEXT LINE 


TO 








00330 *INVERT 


VIDEO 










00269 


♦INVERT 


VIDEO 










00331 * 












00270 


* 








3FD8 Cl 


20 


00332 B2 


CMPB 


#$20 SCROLLED? 


3F83 


86 


20 


00271 




LDA 


#$20 


SPACE 


3FDA 27 


03 


00333 


BEQ 


CRS YES 


3F85 


A7 


82 


00272 




STA 


,-x 


BACK UP ONE 


3FDC 17 


FE35 


00334 


LBSR 


TIMER NO, WAIT ONE BIT 


3F87 


20 


29 


00273 




BRA 


B3 


SAVE POSITION 


3FDF 86 


8F 


00335 CRS 


LDA 


#$8F CURSOR 


3F89 


81 


OD 


00274 


B1 


CMPA 


#$0D 


CARRIAGE RET.? 


3FE1 9E 


88 


00336 


LDX 


<$88 CURSOR POSITION 


3F8B 


26 


OE 


00275 




BNE 


B4 




3FE3 A 7 


00 


00337 


STA 


0,X 


3F8D 


9E 


88 


00276 




LDX 


<$88 




3FE5 35 


96 


00338 


PULS 


A , B , X , PC DONE 








00277 


* 










3DD0 


00339 


END 


START 








00278 


♦CHANGE 


$20 TO 


$60 




00000 TOTAL ERRORS 














00279 


♦IN NEXT LINE 


TO 




















00280 


♦INVERT 


VIDEO 






















00281 


* 


















3F8F 


86 


20 


00282 


B5 


LDA 


#$20 














3F91 


A7 


80 


00283 




STA 


,X+ 


CLEAR TO END OF LINE 


Bl 


3F89 


LI 1 


3F00 


LX1 3EE0 


3F93 


IF 


10 


00284 




TFR 


X , D 




B2 


3FD8 


L12 


3F01 


MSGl 3DF6 


3F95 


C5 


IF 


00285 




BITB 


#$1F 


END OF LINE? 


B3 


3FB2 


L 1 3 


3F18 


NOBRK 3E1 3 


3F97 


26 


F6 


00286 




BNE 


B5 


NOE 


B4 


3F9B 


L14 


3F38 


OUTCNT 3E1D 


3F99 


20 


17 


00287 




BRA 


B3 


SAVE POSITION 


B5 


3F8F 


L15 


3F31 


PARITY 3E1E 


3F9B 


81 


20 


00288 


B4 


CMPA 


#$20 


CONTROL CHAR.? 


B6 


3FAE 


L16 


3F3E 


PIAIN FF22 


3F9D 


25 


39 


00289 




BLO 


B2 


YES, SKIP IT 


B7 


3FAC 


L3 


3E8F 


PIAOUT FF20 


3F9F 


4D 




00290 




TSTA 






B8 


3FBD 


L4 


3F0E 


POLCAT 3E91 


3FA0 


2B 


OC 


00291 




BMI 


B6 


GRAPHICS? 


B9 


3FD1 


L5 


3EC1 


POLL 3E02 


3FA2 


81 


40 


00292 




CMPA 


#$40 


SPECIAL CHARS? 


BITCNT 3E5F 


L6 

r *7 


3F19 

Opl n 


RECV 3E60 


3FA4 


25 


06 


00293 




BLO 


B7 


YES 


BRK 


3EUE 


Li / 


J r Id 


SENDER 3E20 


3FA6 


81 


60 


00294 




CMPA 


#$60 


UPERCASE? 


CHROUT 3F75 


L8 


3F03 


SENT 3E5D 


3FA8 


25 


04 


00295 




BLO 


B6 


YES 


CLEAR 


3DDE 


L9 


3F0C 


SKIPB 3E41 


3FAA 


84 


DF 


00296 




ANDA 


# $DF 


CANCEL OFFSET 


CNTL 


3F57 


LNGTIM 


3E0C 

o noO 


SKIPR 3E2B 


3FAC 


88 


40 


00297 


B7 


EORA 


#$40 


CHAR. OFFSET 


CRS 


3FDF 


LOOPl 


Juby 


SKIPX 3F6A 








00298 


* 








DONE 


3E8E 


LOOPA 


3E38 


START 3DD0 








00299 


♦CHANGE 


NEXT TWO 




DUPLEX 3E1F 


LOOPB 


3E6D 


TIMER 3E14 








00300 


♦BYTES TO S12 


(NOP) 




EXEC 


3F60 


LP1 


3F0D 


TIMERX 3E17 








00301 


♦TO INVERT VIDEO 




LI 


3E98 


LP2 


3EEF 


WRDIN 3E5E 








00302 


* 








L10 


3EF5 


LX 


3EA5 


WRDOUT 3E1C 


3FAE 


88 


40 


00303 


B6 


EORA 


#$40 


INVERT SCREEN 















TOM MIX SOFTWARE 



TELEX 

706139 



• FOR THE COLOR COMPUTER & TDP 100 • 3424 College N.E., Grand Rapids, Ml 49505 (616) 364-4791* 



CU*BER 

32K Mach. Lang. 

$27.95 TAPE 
$30.95 DISK 

Approaches the excite- ; ^ 
ment and challenges of ^ 
any Video Arcade. The 4 j W 
hazards of CLTBER are many. Help CLTBER 
change the colors on the pyramid while avoiding 
many of the dangers always present. Vipers, the 
Nurd, the Dork, bonus points all add up to another 
exciting release from Tom Mix Software. 



too 

G OOG° tS ' 



Arcade Action. Method of play you are the Grabber. 
The object is to grab the 8 treasures and store them 
in the center boxes. You start with 3 Grabbers and 
get extra ones at 20,000 points. Watch out for the 
googlies! Super high resolution graphics. 

16K Machine Language 
$27.95 TAPE $30.95 DISK 



!€ 



AIR TRAFFIC 



- SO 



lySS 



^CONTROLLER| 

32K Ext. Basic 
$28.95 TAPE 
$31.95 DISK 



Air Traffic Controller is a computer model of an 
air traffic control situation in which Remotely 
Piloted Vehicles (RPV’s) are operated by the con- 
troller in landing on and taking off from [ 
designated runways. 






DEVIL 
ASSAULT 
16K Machine 
Language 
$27.95 TAPE 
$30.95 DISK 



Devil Assault is a multi-level multi-screen game 
in which bird-like creatures, robots and the devil 
himself assault your home base which you must 
defend. 



BUZZARD BAIT 

By RUGBY CIRCLE 

16K Machine Language 
$27.95 Tape $30.95 Disk 

We’ve done it again! You 
thought the King was great? 
wait ’till you see this!! 

Outstanding high resolution graphics, tremendous 
sound make this “Joust” type game a must for 
your software collection. As you fly from cloud to 
cloud you will enjoy sky high excitement dealing 
with the challenges presented to you by this 
newest release by Tom Mix Software. 



“THE FROG” 

—ARCADE ACTION — 

This one will give you 
hours of exciting play. . . 
Cross the busy highway 
to the safety of the me- 
dian and rest awhile 
before you set out across 
the swollen river team- 
ing with hidden hazards. 
Outstanding sound and 
graphics. 



THE 



16K MACHINE LANGUAGE 

$27.95 TAPE 
$30.95 DISK 






16K MACHINE LANGUAGE 
TAPE $27.95 
DISK $30.95 



“TRAPFALL” 

By KEN KALISH 

***ARCADE ACTION*** 

The “Pitfalls” in this 
game are many. Hidden 
treasures, jump over the 
pits, swing on the vine, 
watch out for alligators, 
beware of the scorpion. 
Another game for the 
Color Computer with the 
same high resolution 
graphics as “The King.” 



THE 

KING 



32K Machine Language 

$26.95 TAPE 
$29.95 DISK 

ARCADE ACTION - How high can you climb? Four full graphic screens. 
Exciting Sound - Realistic graphics. Never before has the color com- 
puter seen a game like this. Early reviews say: Just like the arcade 
Simply outstanding! 



VISA 



Call our BBS Number 
616-364-8217 24 Hours a Day 



JOURNEY 
TO 

MT. DOOM 

32K Mach. Lang. 

$27.95 DISK ONLY 

The Necromancer is 
about to wage war on 
earth. He needs his lost gold ring to acquire the I 
power to do so. You must find the ring, take it to Mt.f 
Doom and destroy it in the flames from which it | 
came, thus eliminating the Necromancer’s evil | 
powers. 



JUNIOR’S REVENGE 

Climb vines, avoid obstacles & creatures 
to save your father from Luigi. 

32K CASS $28.95 
32K DISK $31.95 






SPACE 



SHUTTLE 



32K Ext. Basic 



$28.95 TAPE 
$31.95 DISK 



This program gives you the real feeling I 
of flight. Full instrumentation complete 
to the max. Actual simulation of space | 
flight. 32K Extended Basic 






OTHER GREAT GAMES 

PROTECTORS • Exciting fast paced arcade game that looks and plays 
like the popular arcade game “DEFENDER”. 

32K Machine Code Tape $24.95 Disk $27.95 

COLOR GOLF - Now sit at your computer and play nine or eighteen 
holes. Outstanding graphics in the fairway or on the green. Helps your 
game. 32K Extended Basic $17.95 

‘YAAZEE” (C) 1983 - Yaazee is a 2 player game using five dice to get the 
best poker hand. After game is loaded flashing digit below player 
number determines which player rolls dice at the start of the game. 16K 
Machine Language Ext. Basic $19.95 

BIRD ATTACK - A fast paced machine language arcade game. Shoot the 
birdmen before they descend upon you. Watch out for their bombs! 16K 
Machine Language $21.95 

MAZE RACE - Maze race is a one or two player game. Play either against 
the built in timer or against your favorite opponent. 16K Machine 
Code $17.95 
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Videotext Save 

Scotchtape and this program can 
help you print out that great info 
you found on CompuServe. 



by Steven Wegert 



V IDEOTEX (THE RADIO Shack tele- 
communication software pack- 
age available in a ROMpak) lets 
you talk with other computers via the 
telephone and a modem. You can con- 
nect with a local bulletin board system to 
check out the most recent hints, tips and 
other assorted goodies on its boards, or 
take advantage of the free connect time 
that is part of the Videotex package to go 
on-line with the CompuServe and Dow 
Jones information services. However you 
apply Videotex, its one major shortcom- 
ing will soon become apparent. 

Videotex has a buffer size commensu- 
rate with the amount of usable RAM in 
your Color Computer. The data sent by 
the host computer scrolls off your screen 
and into this buffer to give you the op- 
tion of later, "off-line" review. But what 
if you wish to save the information in a 
more permanent form — say, to tape or 
as a printout? Radio Shack contends that 
Videotex does not currently support a 
dump to tape or printer option. I dis- 
agree. All you need is a piece of scotch 
tape and Program Listing 1. The mini- 
mum system configuration required is a 
16K Color Computer with Extended 
Basic. A printer is optional for this appli- 
cation. 

Scotch Tape 

You must first devise a method to 
enter and exit Videotex at will. The built- 
in automatic start feature of the ROMpak 
works against us here, so eliminate it! 
Hold the ROMpak cartridge with the 



label facing forward and the arrow 
pointing towards the ceiling. Gently slide 
the cover back, exposing the connector. 
You should see some similarity between 
the photo and what you are holding in 
your hands. It is not necessary to disas- 
semble the ROMpak as I have done for 
the photograph; I did so only for clarity. 

Look carefully. There are contacts on 
both upper and lower sides of the card. 
These are separate, individual contacts 
and are numbered alternately, upper - 
lower for reference. Radio Shack does 
not use pins 1 to 6 in their ROMpak, so 
the contacts are not brought out to the 
connector. Pins 7 and 8 will appear to be 
the first pins from the left. 

This method of disabling the automa- 
tic start feature should work with other 
ROMpaks as well. However, when mod- 



ifying non-Shack cartridges, be certain 
that pin 8 is the pin you are referencing. 

Cover the first contact (from the left, 
indicated by the pencil tip in the photo) 
with a piece of ordinary scotch tape. 
That's it! The automatic execute feature 
is now disabled and an exit from Vid- 
eotex to Basic is as easy as pressing the 
Reset button. 

Turn your computer off. Never plug or 
unplug anything to or from the com- 
puter's port with the power on! Serious 
damage to either the computer or ROM- 
pak can occur! Insert the modified Vid- 
eotex pak and turn your computer on. 
You should see the normal Color Com- 
puter power-on logo. If not, shut the 
computer off, remove the ROMpak, and 
check the placement of the scotch tape. 
It should cover only the one pin. 
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PETROCCI FREELANCE ASSOCIATES 



Inspector CLUEseau 

Sherlock Holmes/Agatha Christie fans-lt’s finally here— A murder 
mystery game for the 80-C! Mr. Goodbody has been killed in his 
mansion and you must solve the mystery. WHO committed the 
murder, WHERE did it occur and HOW was it done! Question 
suspects, find the secret passage, and break the code to get clues. 
Hi-Res graphics enhances this excellent game. The computer 
records the clues you obtain on a clue inventory screen and also 
provides suspect descriptions at the touch of a finger. A fast, fun 
game that will sharpen your deductive skills. Every game is 
different! 

32K Extended $19.95 

Bowling Secretary 

Save hours of tedious work with this efficient program. Calculates 
individual player average, high game and total pins, as well as team games 
won/lost, high series, and cumulative total team points. Also calculates 
team standings for each week in order from 1st to last! All data stores to 
tape and outputs to printer to provide professional, easy to read copy. After 
intitial input of league and player names all you have to do is input each 
week's scores - the computer does the rest!!! 

16KEXT Cassette $24.95 32KEXT Disk 29.95 



★ SUPER DISK UTILITY ★ 

This one does it all! Complete catalog of up to 800 files in matter of 
minutes. (Machine language sort routine) — Sorts Directory in 
alphabetical order and writes it back to disk - Dates files - Super 
Directory prints directory to screen or printer showing # of 
granules, starting granule, date, start, end, entry address - Purge 
Files - Complete Disk Zap contains copy, verify, display (allowing 
modification of), zero and move disk file sectors; allocation table 
check and repair. 

32K EXT DISK $44.95 

Heart-Lung-Circulatory Systems 

Hi-Res Graphic Education 

A difficult subject becomes easy to learn. Programmed learning 
approach divides subject content into concise frames of information. 
Hi-res graphic display with labelled anatomical structures follows text 
frames for added clarity. Visually highlights keywords and concepts. 
Self test questions follow each section. Provides immediate feedback 
to user response and displays correct answers before moving to new 
subject matter. Excellent for school or home use. 

32KEXT Tape $34.95 

32KEXT Disk $39.95 
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Just Like The Arcade 
2 Intermission Screens 
(Fireworks & Chase) 

★ PATTI-PAK ★ 

Invisible Maze 
Every 4th Screen 

★ $21.95 ★ 16K Machine Language 



jail 



Do You Have What It Takes 

★TYCOON* 

Wheel & Deal on Bond St. 
Buy, Sell, Rent,,, $19.95 32K 















GO 



HURRICANE TRACKER 

New!! 

Plots up to three hurricanes simultaneously 
on hi-res map. 

Excellent graphic display. 

2nd program provides hard copy printout. 

16KEXT Tape $15.95 

16KEXT Disk $19.95 

WEATHER WATCH 

Calculates Nat'l Weather Service Statistics. 
Great for Science Projects and Hobbyists. 
Well formatted printout. 

16KEXT Tape $24.95 

32KEXT Disk $29.95 

WEATHER FORECASTER 

Special Price 32KEXT Disk $19.95 



ResultantWaveForml 

Plot resutant waves from 
up to 8 generated waves. 
Agreat way to Illustrate 
this concept. 32K $15.95 



★ KIDS KORNER ★ 

Big Bigger Biggest 16KEXT Tape $9.95 

ABC's 16KEXT Tape $9.95 

123’s 16KEXT Tape $9.95 

Shapes 16KEXT Tape $9.95 

All four for $24.95 



★ INVESTORS ★ 

Real Estate Investment 

(Residential Income Property) 

Helps you answer “which one to buy?" when 
faced with real estate investment choices. 
Calculates after-tax return on investments 
for each alternative as well as the first year 
cash flow for each. Also tests outcomes for 
varying input situations (i.e., "what if ...” 
occupancy rate changes, loan rates higher 
or lower, appreciation rates on property 
change). Printer Output Option. Well Doc- 
umented. 16KEXT Tape $24.95 

32KEXT Disk $29.95 

BOND YIELD 

Helps you find “best buy" in selecting bonds. 
You select several bonds for comparison and 
program calculates yield to maturity for 
each. You will see surprising variations and 
use of this program will spot “true bargains” 
in the bond market. Well Documented. Prin- 
ter Output Option. 

16KEXT Tape $19.95 

32KEXT Disk $24.95 

Include $1.50 for handling for each program. 

A z Residents add 6% Sales Tax. 

Quantity Dlacounta to Dealers. 



(PITROCCI FREELANCE ASSOCIATES 

651 N. Houghton Rd. 

^Tucson. AZ. 85746 “ 

*602-296-1041 



STRESS EVALUATOR 

Measures your stress level and illness 
potential. 

Coping Ability Test/Goal Setting Exercises 
Excellent Graphic Charts/Meditation Screen 
Printer output option 

16KEXT Tape $24.95 

32KEXT Disk $29.95 

MEDICAL 

TERMINOLOGY 

Most Common Suffixes and Prefixes. 
Abbreviations used in Hospital Charting. 
Choice of Study/Self Test/Definition Readout 

32KEXT Tape $19.95 

32KEXT Disk $24.95 

STAGECOACH (Ages 8-12) 

Deliver Annabelle and the Gold to the Judge. 
But watch for Indians and the James Gang!! 

16KEXT Tape $19.95 

32KEXT Disk $24.95 

ASTROLOGY 
CHART PRINT 

Now for LPVII & EPSON MX80 

Full Size Graphic Printout from user input of 
planetary positions and house cusps. 

Prints Comparison Charts around Natal 
Accommodates Placidian, Equal House, 
Modified Equal 

Epson MX80 Version requires GRAFTRAX 

32KEXT Tape $21.95 

32KEXT Disk $26.95 
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Saving Info 

Once you have the logo message on 
screen, instruct the computer to transfer 
control to the machine code program in 
memory (your ROMpak) by typing: exec 
&hcooo, or for decimal fans: exec 49152. 
Then quickly press and release the Enter 
key. You should be greeted with the 
familiar Videotex logo. If, however, 
you're faced with a blank screen, don't 
panic. The keyboard scan routine in 
Color Basic just sensed more than one 
keystroke and you're in the Advanced 
Storage Mode (refer to your Videotex 
documentation for more details on this 
feature). Press the Break key and you'll 
be on your way as usual. 

After you have completed your com- 
munication session and you are off-line, 



press the Reset button. Bingo, you're 
back to Basic, but your buffer is still in- 
tact, hidden deep within RAM. Save 
memory to tape by typing: csavem 

"filename ", i 536, 1 6383, 1 536 and Enter. (Sub- 
stitute 32767 for the 16383 end address 
with 32K computers). Play it safe and 
make more than one copy. At this point 
feel free to turn off the computer and re- 
move the ROMpak. Your information is 
safely saved on tape. 

When you wish to review or print out 
your information, clear all possible mem- 
ory by typing: poke 25,6: new and Enter. 
Load your information back into the 
computer with the CLOADM command 
but do not EXEC. At the ok prompt enter 
Program Listing 1 and type RUN. 

The program is self prompting. At the 



tone, press c to continue paging, p to 
send the current page to the printer 
(make certain the printer is ready to print) 

or e to exit. 

The Program 

Vidsav/cc is quite elementary in theory 
as well as in operation. By executing an 
effective PCLEAR 0 command (poke 
25,6:NEw), the memory reserved for 
graphics when you turn your computer 
on is released, letting you place the code 
in the first available address of user RAM . 
This is important, as you wish to over- 
write as little of your buffer as possible. 

The For/Next loop in Line 80 estab- 
lishes the boundaries of video memory. 
By PEEKing into the area of RAM that 
Videotex uses for its buffer, and POKEing 
those values into the video memory, you 
will reconstruct your information , char- 
acter by character, one screen at a time. 

Starting at Line 205, through similar 
gyrations, the video memory is PEEKed 
and that value is sent to the printer to 
create a printout of the current page be- 
ing viewed. 

The Listing is freely commented for 
convenience. Modify it to your heart's 
content, but keep in mind that the longer 
the code, the greater must be the value 
of Yin Line 70. 

There are several areas in Vidsav/cc 
that could be enhanced. For example, a 
page dump to cassette or a backwards 
scroll through the buffer could be added. 

I chose to keep the program short to 
avoid overwriting the buffer. The solu- 
tion would be to write the program in as- 
sembly language and place it out of 
harm's way. I chose Basic for its simplic- 
ity, not practicality. 

Since this is a quick and dirty fix to a 
much-complained-about problem, there 
are some rough spots in the program 
that warrant explanation. Vidsav/cc is in 
Basic and may overwrite a portion of 
memory saved when it is CLOADed. This 
can be minimized by eliminating all un- 
necessary spaces and renumbering the 
program with increments of 1 . Also, the 
program will continue to display memory 
even after your saved information has 
long since passed by. This will continue 
until the e option is chosen. 

Vidsav/cc can be downloaded from 
the Color Computer Special Interest 
Group (CCSIG) Access database on 
CompuServe. Once in the XAO database, 
type DOW VIDSAV/CC(71 735,230). 

I would be most happy to respond to 
questions that include a self addressed, 
stamped envelope. For a quicker re- 
sponse I may be contacted through 
EMAIL or on the CCSIG. ■ ■ ■ 



Program Listing 1. VIDSA V/CC 



1 1 VIDSAV . BAS 05/15/83 VER 1.1 

3 1 by Steve Wegert 

10 'BEFORE loading this program 

20 'execute the mandatory 

30 ' PCLEAR0 (i.e. POKE25 , 6 : NEW ) 

40 'or portions of your saved 
50 'data may be written over. 

70 CLS : Y=1887 'Start of Buffer 
75 REM**** SET VIDEO BOUNDARIES 
80 FOR X=1024 TO 1503 
85 REM**** PUT BUFFER ON SCREEN 
90 POKE X, PEEK ( Y ) 

100 POKE X+1,191 
110 Y=Y+1 
130 NEXT X 

140 PRINT@480 , "<C> continue <P> 
print <E> exit"; 

150 SOUND 200,2 :SOUND 200,2 : SO 
UND 200,2 ***** AUDIBLE PROMPT 
160 A$=INKEY$ : IF A$ = "" THEN160 
170 IF A$="C" THEN CLS :GOTO 80 
180 IF A$="P" THEN GOSUB 205 
190 IF A$="E n THEN CLS : END 
200 GOTO 140 

205 REM***** PRINT ROUTINE 
210 FOR S=1024 TO 1503 STEP 32 : 
FOR Q=0 TO 31 

220 P=PEEK ( S+Q ) AND 127: IF P>95 
THEN P=P-64 ELSE IF P<32 THEN P 
= 46 

230 PRINT# -2 , CHR$ ( P ) ; : NEXT Q :P 

RINT#-2 -.NEXT S 

240 RETURN ■■■ 
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1 6K Disk Extended Color Basic 



Part II of a primer on disks. 



Disk 

Secrets 




by William Barden, Jr. 



Last month Bill presented Part I of 
this primer on disks and disk operat- 
ing systems. We take up where that 
article left off, with the File Allocation 
Table. 



S ECTOR 1 OF THE directory track is 
reserved for a File Allocation Table. 
In the Models l/lll/IV, this is called a 
gat or Granule Allocation Table. What is 
a granule — one of those subatomic par- 
ticles like a quark or Charm? 

Suppose you're a systems program- 
mer working at Microsoft writing Disk 
Operating Systems. How do you "dy- 
namically" allocate disk space? It's logi- 
cal to divide the disk up into 35x1 8=630 
sectors and allocate them one sector at 
a time as required. (It's not very conven- 
ient to work with segments smaller than 
256-byte sectors.) However, 256 bytes is 
only about eight 32-character lines of 
text, and that might not be an efficient 
size. On the other hand, one track on the 
disk holds 4608 bytes, and that might be 
too large a chunk, allowing only 34 files 
on a single disk. 

The arbitrary size chosen for files is 
nine sectors, and this is designated as 
one granule. This allows for 68 files on a 
disk, each file capable of holding 2304 
bytes in a granule, or 72 32-character 
lines. In addition, granules can be strung 
together to make up larger files. 

The File Allocation Table takes up the 
first 68 bytes of sector 2 on the directory 
track, and appears as shown in Figure 1 . 
The first byte is the code for granule 0 
(track 0, sectors 1 through 9), the next 
byte is the code for granule 1 (track 0, 
sectors 10-18), and so forth. 

If a granule code is a binary $FF, then 
that granule is available. If the code is not 



$FF, then the granule is currently occu- 
pied by a disk file. 

Remember the directory entry? One of 
the bytes in the entry pointed to the loca- 
tion of the first granule in the file. The file 



is found by the Disk Operating System 
software searching the directory for a 
given file name. When the name is found, 
the location of the first granule is in the 
directory entry. The DOS software then 

t more 
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ETTER 

OFTWARE COMPANY 

P.O. Box 16842 - Sta B 
Greenville. South Carolina 29606 
(803) 233 2700 



PRESENTS 




COLOR— STICK 

The ORIGINAL interface for 

the mS-80* 
Color Computer to let 
you use the fomous: 

ATARI* JOYSTICK' 



Just plug your Atari or Atari like 
joystick (the Color-Stick enables the 
use of most joysticks made for the 
Atari) into the Color-Stick interface 
and then plug the Color-Stick into an 
empty joystick port. 

The Color-Stick can improve 
scores 50% and more while making 
some games more exciting and fun to 
play. 

Don’t settle for cheap imitations. 
Only the ORIGINAL Color-Stick’s 
small inline design allows you to just 
plug your joystick into it and forget it. 
The Color-Stick becomes a part of 
your joystick so it does not interfere 
with your game playing. In addition 
Color-Stick returns a full value of ’63’ 
for the right and down directions, 
even when using two joysticks and 
even in the diagonal directions, the 
others don’t. 

NOW Color-Stick has a 

new low price 

Color-Stick interface $10.95 each 

two for $19.95 (less joysticks) 

Atari joysticks $9.95 each 






ETTER 

OFTWARE COMPANY 

P.O. Box 16842 — Sta. B 
Greenville, South Carolina 29606 
(803) 233-2700 



Don’t miss out order the 
ORIGINAL. Send your check or 
money order or better yet call 
today and order your Color-Stick. 




Add $2.00 per order shipping and handling. Bank cards 
welcomed (please include expiration date). Orders paid 
by cashiers check, money orders, bank cards and 
C.O.D. are shipped within 48 hours. Personal checks 
please allow 1-2 weeks. C.O.D. orders add $1.50 extra. 
S.C. residents add 4% sales tax. *TRS-80 is a registered 
trademark of Tandy Corp. Atari is a registered trade- 
mark of Atari, Inc. 





looks at the File Allocation Table entry. If 
it is a value of $C0 through $C9, the file 
is only one granule long . If the File Alloca- 
tion Table (FAT) entry is other than $C0 
through $C9, however, the FAT entry 
points to the next granule of the file. The 
corresponding FAT entry for the next 
granule may be $C0 through $C9, indi- 
cating the last sector of the file, or may 
point to still another granule. How many 
granules can be chained together in this 
fashion? Any number up to the limits of 
the disk space. Figure 2 shows a typical 
chained file. 

When files are deleted from a disk, the 
first byte of the directory entry is set to 0, 
and all FAT entries connected with that 
file are set to $FF, indicating that they are 
available. When files are added to the 
disk, the DOS software may link together 
granules that are spread all over the disk, 
rather than making them one contigu- 
ous area. (An interesting point: recopy- 
ing files to a clean disk may speed up ac- 
cess time, because the new files will be 
in adjacent sectors — the disk does take 
some time to step across tracks and find 
sectors.) 

To clean up a couple of loose ends: the 
format of the FAT entry for the last 
granule is shown in Figure 3. The lower 
six bits indicate how many sectors of the 
granule are actually part of the disk file. 
In the minimum case, only the first sector 
of the granule would be used for the file. 
Bytes 1 4 - 1 5 in the directory entry gives 
the number of bytes in use in the last sec- 
tor of the file. The DOS software, there- 
fore, knows exactly how many bytes are 
in the file, even though a portion of the 
granule may be unused. 

Using DSKI$ 

All of the earlier discussion gives us 
enough background so we can discuss 
the Basic DSKI$ command. This com- 
mand lets us read any sector on the disk, 
setting two strings to the 256 bytes of 
the sector, as shown in Figure 4. 

The format for DSKI$ is: dski$ disk drive 

number, track number, sector number, string 1, 
string2. 

A typical read of the first directory sec- 
tor from disk drive 0 using DSKI$ would 
be: 100 dski$ o, 17 , 3 ,a$,b$. In this case, 
string A$ is set equal to the first 128 
bytes of sector 3, track 1 7 and string B$ 
is set equal to the last 1 28 bytes of sector 
3, track 17. Why two strings? The 256 
bytes in a sector are too long for a single 
string. 

After the DSKI$ operation the strings 
will probably not be printable. The 
strings will be made up of both printable 
ASCII characters and non-printable char- 

| more 
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DIRECTORY 



+14 
+ 15 



$00 

S7F(127 10 ) 



* OF BYTES IN 
LAST SECTOR 
(127 BYTES IN 
THIS EXAMPLE) 



MORETON BAY SOFTWARE 
DOUBLE DRIVER 



ALWAYS 

ONES 



o (4 SECTORS IN 

_J THIS CASE) 



# OF SECTORS 
OF LAST GRANULE 
THAT ARE PART 
OF FILE 




(TYPICAL) 

) LAST GRANULE 
OF FILE 



The BEST monitor driver available, unlike some monitor 
drivers the Double Driver provides TRUE monochrome 
and color composite output. Audio Output. Solderless 
installation. $24.95 




TRIVIA 

The Einstein Edition 

A one to four player trivia game. Nine categories of questions: 
Computers & Math Animals Entertainment 

Music & Art Science Language & Literature 

Sports & Games History Politics & Geography 

More than 1 000 challenging questions. A great game for parties 
or family fun. 

16K Non Extended 
Tape $19.95 Disk $21.95 



Figure 3. Last Granule FA T Format and Number of Bytes 
in Last Sector. 



64K UPGRADES 




B$ STRING A $ STRING 



Figure 4. DSKI$ Operation 



Instantly access 64K via M/L Totally solderless kit to 
upgrade E Boards. Kit includes eight 4164 prime chips 
and chips U29 and U11 already soldered. E Board Kit 
$69.95 

Color Computer II kit requires soldering. $69.95 




MORETON BAY SOFTWARE 

A Division of Moreton Bay Laboratory 

316 CASTILLO STREET 
SANTA BARBARA, 
CALIFORNIA 93101 
(805) 962-3127 



Ordering Information 

Add $2.00 shipping and handling per order. We ship within 
24 hours on receipt of order. Blue Label Service available. 
California residents add 6% sales tax. 
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Diskettes 


Qty. 


Retail 


Sale 


40 -Track 


10 pak 


$ 3 »« 


*1" ea. 


Single Sided 


20 pak 


$ 3*9 


*1” ea. 


Double Density 50 pak 


$ 2*9 


*1” ea. 


With Hub Rings 100 pak 


>2«« 


*1 69 ea. 




10 pak case 


$499 


* 3 S0 ea. 



Cassettes 


Retail 


12-Pak 


24-F 


C-5 


99C 


65C 


554 


C-10 


*1» 


69C 


594 


C-15 


*1 49 


75C 


654 


C-20 


*1 M 


79C 


694 


Hard Box 


49C 


26C 


214 



UPS Shipping (48 States) 
$ 3°° Per Pack 







2665 E. Busby Road 
Oak Harbor, Wash., 98277 
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MasterCard 




V/SA 
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■■■■II 



IMMEDIATE 

SHIPMENT 

l-(206)-675-6143 



acters. You'll have to do some processing 
to display the contents of a sector. 

Disk Sector Dump Program 

We've made it easy to read any sector 
on the disk. Program Listing 1 will read 
any disk sector and then display the con- 
tents of the sector in hexadecimal, with 
an optional ASCII display. The ASCII dis- 
play is handy because you can look for 
text data to locate directory entries or 
text files. The contents of the sector can 
also be printed on your Color Computer 
line printer. A typical display is shown in 
Figure 5. 

The program uses the DSKI$ com- 
mand to read a given drive, track, and 
sector number. After the first sector is 



displayed, pressing the Enter key will au- 
tomatically display the following sector, 
even from the next track. Continually 
pressing Enter will display consecutive 
sectors, or you can enter a new sector 
number atanytime. 

Use this program to decode the disk 
contents for yourself. You can use it to 
find file formats, locations of disk files, 
and so forth. 

To change the program so it will con- 
tinually print (or display) the entire disk, 
change Line 290 to read : 290 goto i 90. 

Disk Directory/Map Program 

The second disk program we've im- 
plemented displays or prints a directory 
of the disk, in addition to a map of the 
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Figure 5. Disk Sector Dump Display 
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Figure 6. Disk Directory Display 
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disk granules (see Listing 2). The program 
also tells you how large the files are in K 
segments (1024 bytes). (I find K easier to 
relate to than those blasted granules — 
I always have to multiply by 2,304 in the 
granule's case.) 

The first column of the display (see Fig- 
ure 6) is the program name and exten- 
sion . The next is the type of file (BP= Basic 
program, MP=machine language pro- 
gram, TE=text file, BD=Basic data). The 
next is the ASCII/binary status of the file. 
The next is the total number of granules 
in the file. The last column is the total 
number of bytes in the file. 

At the end of the directory listing the 
total number of granules and bytes from 
the directory is printed. I've found that 
this figure does not always agree with 
the freeo command figure. In at least one 
case, laboriously comparing directory en- 
tries with the FAT, I've found granules al- 
located but with no corresponding direc- 
tory entry. Operator error? DOS error? 
You figure it out and call me collect. 

One note about the number of gran- 
ules and amount of total bytes: it is 
based on the actual number of granules 
allocated and does not account for any 
space within the granule that is unused. 
Even though you may see a freeo figure 
of 0 granules, you may have additional 
room in existing files to add other data. 
In the average case, you'll have about 
another 1 100 bytes. 

At the end of the directory listing, a 
prompt asks you if you're interested in a 
disk map. If you are, hit any key and the 
map shown in Figure 7 will be displayed 
(not printed). The map indicates an un- 
used granule by a filled bullet and a used 
granule by an empty bullet. The directory 
track is not shown. 

Today DSKI$, 
Tomorrow DSK0$ 

The two programs above show what 
can be done with DSKI$. It's a far cry 



from the Model I days; however, we 
haven't even touched on DSK0$, the cor- 
responding command to write sectors, 
or on machine language disk I/O through 
a ROM subroutine called DSKCON. Here 
are some of the things that are possible 
without too much trouble by using 
DSK0$ and DSKCON: 

• Password protected files 

• Preallocating contiguous areas of 
disk for large, rapidly-accessed user files 

• Disk clean-up programs to rewrite 
files 

• Purge programs to rapidly purge a 
disk of unwanted files 

• Append programs to append two 
Basic or other files 

• Sorted (alphabetized) directories 

• "Super" disk directories from a 
number of disks 

• High-speed disk I/O 

• Packing data 

The list goes on and on. If you would 
like to see more in this vein, drop me a 
note, EMAIL me on CompuServe 76703, 
347, or leave me a message on the Com- 
puServe Color Computer special interest 
group (GO PCS-126). 'Til I hear from 
you, happy disk programming! ■ ■ ■ 
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Figure 7. Disk Directory Map 



The computer-age 
storybook for kids! 




Katie and the Computer 

By Fred D’Ignazio 
Illustrated by Stan Gilliam 

This wonderful storybook teaches young 
children how a microcomputer works. 
Katie ends up inside her dad’s new 
micro... and has an adventure with Colo- 
nel Byte and the other characters who 
make a computer work. Her jov. :ney fol- 
lows the path of a computer command; her 
experiences are technically accurate yet 
easily understandable, right down to her 
encounters with a program bug. Addi- 
tional material is included to help you re- 
late the story to actual working parts of the 
computer. With truly exceptional color il- 
lustrations, this is an excellent first com- 
puter book for youngsters. 

Hardcover, 11" x QV 2 ", illustrated. 

For faster service, 
PHONE TOLL FREE: 

800 - 631-8112 

(In NJ only: 201-540-0445) 

Also available at your local bookstore 
or computer store. 

CREATIVE COMPUTING PRESS 

Dept. NL9C 39 East Hanover Avenue 
Morris Plains, NJ 07950 

Please send me Katie and the | 

Computer at $8.95* plus $2.00 postage and 1 
handling each. Outside USA add $3.00 per • 
order. #12A 

□ PAYMENT ENCLOSED $ | 

‘Residents of CA, NJ and NY State add j 

applicable sales tax. 

□ CHARGE MY: 

□ American Express 

□ MasterCard □ Visa 

Card No 1 

Exp. Date | 

Signature > 



(please print full name) 

I Address Apt 

j City 

| State/Zip 

I □ Send me a FREE Creative Computing 
Catalog. 



Program Listing 1. Disk Sector Dump 
90 CLEAR3000 

100 'DISK DIRECTORY PROGRAM. MAP 
S DISK AND LISTS DIRECTORY 
110 CLSs TN=0 

120 PRINT @5, "DISK DIRECTORY PRO 
GRAM" 

130 PRINT 032, "PRINTER OUTPUT? E 
NTER Y OR N";: INPUT P$ 

140 DSKI$ 0,17,2,G1$,G2$ 

150 FOR S=3 TO 11 
160 DSKI$ 0 , 17 ,S , A$ ,B$ 

170 GOSUB 370 * more 
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180 A$=B$ ; GOSUB 370 
190 NEXT S 

200 PRINT "TOTAL GRANS USED:";TN 
; "OUT OF 68" 

210 IF P$=" Y" THEN PRINT#-2 , "TOT 
AL GRANS USED: " ;TN; "OUT OF 68" 
220 PRINT "TOTAL K USED : " ; TN* . 2 5 
*9; "OUT OF 153" 

230 IF p$= " Y" THEN PRINT#-2 , "TOT 
AL K USED: " ;TN*. 25*9; "OUT OF 153 

If 

240 PRINT "HIT ANY KEY FOR MAP"; 

250 A$=INKEY$ : IF A$="" THEN 250 

260 CLS : PRINT® 10, "DISKETTE MAP" 

270 PRINT0128 , " " ; 

280 FOR 1=1 TO 4 

290 PRINT"GRANS" ; ( 1-1 ) *17 I 
*17 ) -1 ;TAB( 14 ) ; 

300 FOR J=1 TO 17 

310 A$=MID$(G1$,(I-1)*17+J,1) 

320 IF A$=CHR$ ( 255 ) THEN PRINT " 
."; ELSE PRINT "O"; 

330 NEXT J 
340 PRINT 
350 NEXT I 
360 GOTO 360 

370 'LIST DIRECTORY ENTRIES SUBR 
OUTINE 

380 FOR J=0 TO 3 

390 N$=MID$(A$,(J*32)+1,8) 

400 E$=MID$(A$,(J*32)+9,3) 

410 T$=MID$(A$, (J*32)+12,l) 

420 F$=MID$(A$,(J*32)+13,1) 

430 G$=MID$(A$, (J*32)+14,l) 

440 U$=MID$(A$ , (J*32)+15,2) 

450 IF LEFT$ ( N$ , 1 ) =CHR$ ( 0 ) THEN 
600 

460 IF LEFT$ ( N$ , 1 ) =CHR$ (255) THE 
N 600 

470 FOR K=1 TO 8 

480 IF MID$ ( N$ ,K , 1 ) =" " THEN 500 

490 NEXT K 
500 T=ASC(T$) 

510 IF T=0 THEN T$="BP" ELSE IF 
T=1 THEN T$="BD" 

520 IF T=2 THEN T$="MP" ELSE IF 
T=3 THEN T$="TE" 



530 IF ASC ( F$ ) =0 THEN F$="BIN" E 
LSE F$=" ASC" 

540 NG=0 : G=ASC ( G$ ) 

550 GOSUB 620: NG=NG+1 : TN=TN+1 : 
IF G>=192 THEN 560 ELSE 550 



560 PRINT LEFT$(N$,K-1) ;"/";E$;T 
AB ( 13 ) ;T$ ;TAB ( 17 ) ;F$;TAB(22) ;NG ; 

570 IF P$=" Y" THEN PRINT#-2 , LEFT 
$ ( N$ , K-l ) ; "/" ; E$ ; TAB ( 13 ) ;T$;TAB( 
17) ; F$ ;TAB ( 22 ) ;NG ; 

580 PRINT TAB( 25) ;STR$ (NG* . 25*9) 

; "K" 

590 IF P$=" Y" THEN PRINT#-2, TAB 
(25) ; STR$ ( NG* . 25*9 ) ;"K" 

600 NEXT J 
610 RETURN 

620 G=ASC ( MID$ (Gl$ ,G+1 , 1 ) ) 

630 RETURN ■■■ 



Program Listing 2. Disk Directory/Map 



100 'BASIC PROGRAM TO READ DISK 
SECTORS 

110 CLS: CLEAR 1000 

120 PRINT "DISK SECTOR SEARCHER" 

130 PRINT " DRIVE# ( 0-3 ) " ; : INPUT D 
N 

140 PRINT "PRINTER, Y OR N";:INP 
UT P$ 

150 PRINT "TRACK NUMBER (0-34)"; 
: INPUT ZZ$ 

160 IF ZZ$="" THEN 190 ELSE TN=V 
AL ( Z Z $ ) 

170 PRINT "SECTOR # (1-18)"; :INP 
UT SN 



180 PRINT "ASCII, Y OR N";: INPUT 
S$ : GOTO 200 

190 SN=SN+1 : IF SN=19 THEN SN=1: 
TN=TN+1 : IF TN=35 THEN 120 
200 DSKI$ DN , TN , SN , AA$ , AB$ 

210 PRINT "DRV #:";DN;"TRK #:";T 
N ; "SCTR # : " ; SN 

220 IF P$=" Y" THEN PRINT #-2,"DR 
V # : " ; DN ; " TRK #:";TN;"SCTR #:";S 
N 
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230 IF ( AA$OSTRING$ (128 , CHR$ (25 
5))) OR ( AB$OSTRING$ (128 ,CHR$ ( 2 
55) ) ) THEN 270 

240 PRINT "255 DATA PATTERN" 

250 IF P$=" Y" THEN PRINT#-2 , " 255 
DATA PATTERN" 



260 GOTO 290 

270 GOSUB 300 

280 AA$=AB$ : GOSUB 300 

290 GOTO 150 

300 FOR ZJ=1 TO 16 

310 ZA$=MID$(AA$,(ZJ-1)*8+1,8) 

320 GOSUB 380: PRINT 
330 IF P$=" Y" THEN PRINT#-2 
340 IF S$="N" THEN 360 ELSE GOSU 
B 520: PRINT 

350 IF p$=" Y" THEN PRINT#-2 
360 NEXT ZJ 
370 RETURN 

380 'SUBROUTINE TO PRINT 8 LOCAT 
IONS IN HEX. ZA$=8-BYTE STRING. 
390 FOR ZI = 1 TO 8 
400 ZA=ASC(MID$(ZA$,ZI,1) ) 

410 ZB=INT ( Z A/16 ) : ZC=ZA- ( ZB*16 ) 

420 ZD=ZB : GOSUB 480 
430 ZD=ZC : GOSUB 480 
440 PRINT " "; 

450 IF p$=" Y" THEN PRINT#-2," "; 

460 NEXT ZI 
470 RETURN 

480 ZD=ZD+48 : IF ZD>57 THEN ZD=Z 
D+7 

490 PRINT CHR$ ( ZD ) ; 

500 IF P$=" Y" THEN PRINT#-2 , CHR$ 
(ZD) ; 

510 RETURN 

520 'SUBROUTINE TO PRINT 8 LOCAT 
IONS IN ASCII. Z A$=8-BYTE STRING 

530 FOR ZI=1 TO 8 
540 ZB$=MID$(ZA$,ZI,1) 

550 IF ( ZB$>=" ") AND (ZB$<CHR$( 
128)) THEN 560 ELSE ZB$="." 

560 PRINT ZB$ ; " "; 

570 IF P$=" Y" THEN PRINT#-2 , ZB$ ; 

n n # 

580 NEXT ZI 

590 RETURN ■■■ 



MIM 

THE MAGIC IMAGINATION MACHINE 



1. 7168 BYTES OF RAM 

Consisting of three 2048 x 8 RAMS and one 1 024 X 8- — 2k Sockets will 
also accept 2716 EPROMS 

2. 8 INPUT ANALOG TO DIGITAL CONVERSION 

20 microsecond conversion time and 8 bit resolution 

3. 2 DIGITAL TO ANALOG CONVERTERS 

4. VERSATILE INTERFACE ADAPTER 

Two 8 line ports, two timers, a shift register and four control lines giving it 
both serial and parallel I/O capability--lines are brought out on two 1 4 pin 
sockets for connecting to printers, etc. 

5. PERIPHERAL INTERFACE ADAPTER 

Adds two more 8 line ports with control lines for printers and other devices 

6. EPROM PROGRAMER 

Has ability to read and/or program the following EPROMS: MCM 68766 

MCM68764 MCM68732 MCM2532 2764 2732 2716 

2716 type EPROMS may be plugged into the 2K RAM sockets if desired 

7. 8 SWITCH CLOSURE DETECTORS 

Four are connected to joystick type connectors to pick up 'fire buttons' and 
four are located on an 8 pin socket— all together may used as an 8 input 
port 

8. DISK COMPATABLE 

9. ASYNCHRONOUS COMMUNICATIONS INTERFACE 
ADAPTER 

Output to a printer-type DIN socket to provide another RS-232 I/O 

10. SOFTWARE CONTROL 

Over selection of A/D inputs (all inputs through standard 5 pin joystick 
sockets) This provides four more joystick inputs (anybody want to write a 
game for 6 players? I) There is also software control over whether the in- 
puts are AC or DC 

11. 40 PIN SOCKET WITH ALL COCO LINES 
AVAILABLE 

12. FUNCTION GENERATOR WITH SINE-TRIANGLE-AND 
SQUARE WAVE OUTPUTS 

13. SOFTWARE CONTROL 

Over routing of siginal sources to the computer sound input to allow ex- 
tensive sound generation possibilities-either or both D/A's may be used to 
software generate attack decay etc. and a phase locked loop provides 
precise frequency control over the sine-triangle-square generator 

14. SOFTWARE CONTROL 

Of RAM bank select for machine with 32K to allow selection of the other 
32K bank-machine language programs may be placed in MIM's RAM or 
2716 EPROM's, allowing full use of the computer's 65536 bytes of RAM 
for data, graphics, etc. - software control of a hardware bank select in 
MIM can provide almost as much memory to BASIC users 

1 5. SOFTWARE CONTROL 

Of interrupts from VIA PIA ACIA and A/D 

16. ZERO CROSSING DETECTOR 

To allow use of VIA to count, measure frequency, use other inputs for 
phase locked loop control, etc. 

17. FULLY BUFFERED 

POSSIBLE USES 
(only the tip of the Iceberg) 

Study voice recoginition by plugging in a microphone (a preamp is provided 
for this) and saving it to memory, then putting it on the screen, or in a voice 
print to printer or disk. 

Study musical wave forms, modify them and make your own music. 

Don't like the way BASIC does something? Load it into RAM, change it and 
program your own version on an EPROMI 

Write games using six players and the extensive sound capabilities of MIM. 
Create an 8 channel storage oscilloscope and save the results on disk or 
print them on the printer or a plotter. 

Program a parallel and/or serial printer port with spooling to speed up pro- 
cessing. 

Control outside devices with digital or analog signals. 

Input and analyze analog and digital signals. 

Design a software controlled phase locked loop signal generator, frequen- 
cy meter, volt meter, storage oscilloscope all in one system) 

Home monitoring system, weather monitoring system, robot control 
system, many more control uses than CoCo alone can handle. 

FULL DOCUMENTATION, SCHEMATIC AND SAMPLE 
PROGRAMS INCLUDED IN OWNER'S MANUAL 
ALL FOR ONLY $445.0011! 

(PLEASE INCLUDE $7.00 P & H) 

ORDER FROM: GROTO 
P.O. BOX 9088 ODESSA, TEXAS 79767 

PAYMENT MAY BE MADE BY CHECK, MONEY ORDER, VISA OR 
MASTERCARD. INCLUDE CARD NO.. EXP. DATE, AND BANK ID. 
TEXAS RESIDENTS PLEASE INCLUDE 5% SALES TAX. PLEASE ALLOW 4 
TO 6 WEEKS FOR DELIVERY. 

THANKS FOR YOUR BUSINESS - IT IS APPREC/A TED, 
GROWNUP'S TOY COMPANY 



S Enter 37 on TeleResponse page 159 



Color Computer/71 




Color Basic ROM 




Part / of an explanation 
that should help our readers 
who find Jake's disassembly a bit obscure . 
Get out your notebooks, get set to concentrate, 

and read on... 



M ICROSOFT'S COLOR BASIC is 
an outstanding language. 
While converting TRS-80 Mod- 
el l/lll programs to Color, I discovered 
some undocumented peculiarities. Inves- 
tigation of these led to a detailed dissec- 
tion of the Color Computer operating 
system. I'll tell you what I found, then I'll 
discuss how the Basic interpreter works, 
and finally, how to modify the Basic lan- 
guage. That's right: you can customize 
your system, and it's really not hard. 



How The Interpreter Works 

In this simplified description of how 
the system works, all memory locations 
and data are given in hexadecimal values. 

The legal Basic commands and func- 
tions (or keywords) are contained in sev- 
eral lists stored in the ROMs. A separate 
set of lists stores the execution addresses 
corresponding to each keyword. 



by James A. Sanford 



When power is first applied, the sys- 
tem hardware is initialized and several 
blocks of data are transferred from the 
ROM to the low (system use only) area of 
RAM. Some of the information placed 
there consists of: the number of key- 
words in a particular list; the address of 
that list; and the start address of either 
a vector table (execution addresses) or an 
execution routine (see Figure 1 ). 

The first block of five bytes, at location 
0120, contains the information for 
Color Basic keywords. The second block 
contains the information for the Color 
Basic functions. In Color Basic, the next 
two blocks contain: 00 — (no more key- 
words); 4AB4 — (unknown significance); 
and B277 — (address for routine which 
generates error messages). 



In an Extended Basic system, these 
blocks will contain data for the Extended 
Basic keywords and functions and the 
next two blocks point to the error rou- 
tine. In a Disk Basic system, these two 
blocks, beginning at 0133, point to the 
Disk Basic keywords and functions, with 
the error information beginning at 01 3E. 
In my disk system, this area of memory 
looks like Figure 1. 

Looking at the keyword lists, you will 
find the ASCII codes for each letter of 
each keyword with one exception. The 
last letter of each keyword has 80 added 
to its ASCII code. This is how the inter- 
preter will recognize the end of a particu- 
lar keyword. For example run is stored 
as: 

52 R 
55 U 

CE N 4E+80 

When a statement is entered from the 
keyboard, it goes into a buffer at location 



ADDRESS 


CONTENTS 


COMMENT 


ADDRESS 


CONTENTS 


COMMENT 


0120 


35 


Number of Keywords 


0134 


13 


Number of Keywords 


0121 


AA66 


Address of Keyword List 


0135 


C17F 


Address of Keyword List 


0123 


AB67 


Address of Vector Table or Execution 
Standard Basic Commands 


0137 


C220 


Add ress of Vector Table or Execution 
Disk Basic Commands 


0125 


14 


Number of Keywords 


0139 


06 


Number of Keywords 


0126 


AB1A 


Address of Keyword List 


01 3A 


C201 


Address of Keyword List 


0128 


AA29 


Address of Vector Table or Execution 
Standard Basic Functions 


01 3C 


C236 


Address of Vector Table or Execution 
Disk Basic Functions 


01 2A 


19 


Number of Keywords 


013E 


00 


Number of Keywords 


012B 


8183 


Address of Keyword List 


013F 


4AB4 


Address of Keyword List 


012D 


813C 

(CE2E) 


Address of Vector Table or Execution 
Extended Basic Commands(with Disk) 


0141 


B277 


Address of Vector Table or Execution 
No More 


012F 


OE 


Number of Keywords 


0143 


00 


Number of Keywords 


0130 


82 IE 


Address of Keyword List 


0144 


B44A 


Address of Keyword List 


0132 


8168 

(CE56) 


Address of Vector Table or Execution 
Extended Basic Functions (with Disk) 


0146 


B277 


Address of Vector Table or Execution 
No More 



Figure 7. Initialization Data Blocks 
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AMDISK YOUR 
COLOR COMPUTER® 

Get 31 2 Kbytes* of on-line, formatted storage capacity for your Color Computer 
with the Amdisk-lll. The Amdisk-lll is a disk drive system that combines the capacity 
and compatibility of 5!4" floppies with the convenient size and ruggedness of the 
state-of-the-art in technology — the 3 " microfloppy cartridge. 

Join the move to maximize your Color Computer’s power and “Amdisk” it. Many 
software vendors have joined, and will be providing software on Amdek’s 3" car- 
tridge upon request. These software suppliers are: Cognitec; Computerware; Frank 
Hogg Laboratories; The MicroWorks; Tom Mix Software; Moreton Bay Software; 

Nelson Software Systems; Petrocci Freelance Associates; Prickly Pear Software; 

Saguaro Software; Skyline Marketing; The Software Station; Spectrum Projects; 

Star-Kits and Sugar Software. 

* An additional 31 2 Kbytes may be accessed by manually flipping the media over. 

/p\ 

Color Computer is a registered trademark of Tandy Corporation. 



You can purchase the Amdisk-lll from 
any of these fine dealers: 

Computerware: (61 9) 436-3512 
Delker Electronics: (615) 459-2636 
Emerald Computer: (800) 468-4606 
Saguaro Software: (602) 885-6508 
Skyline Marketing: (31 2) 286-0762 
Spectrum Projects: (212) 441-2807 
The Software Station: (313) 532-2550 
or ask for the Amdisk-lll at your local 
computer dealer. 



2201 Lively Blvd. • Elk Grove Village, IL 60007 
(312)364-1180 TLX: 25-4786 

REGIONAL OFFICES: Southern Calif. (714) 662-3949 • Texas (817) 498-2334 

Northern Calif. (408) 370-9370 • Denver (303)794-1497 





02DD. When a carriage return is entered, 
the system looks for a line number at the 
beginning of the buffer. If one is found, 
the buffer contents will be tokenized and 
then placed in the Basic area of RAM . 76- 
kenization converts a several byte in- 
struction into one or two bytes, saving 
memory. If there is no line number, the 
buffer will be tokenized, and then im- 
mediately executed. 

To tokenize an instruction, it is com- 
pared with the words in the keyword list 
until a match is found. A counter keeps 
track of the number of words checked 
until this match is obtained. This number, 
logically ORed with 80, will become the 
token for that keyword. If all keyword 
lists are checked with no match, the 
token becomes FF, and the function lists 
are checked. If the word is a valid func- 
tion, a second byte of the token will be 
generated, consisting of the number of 



words checked, logically ORed with 80. 

If all keyword and function lists are 
checked with no match, the error routine 
is called to report a syntax error (SN). Fig- 
ure 2 is a flowchart of this process. 

Once the input is tokenized, execution 
will depend on whether it is a Basic com- 
mand, an Extended Basic command, or a 
Disk Extended Basic command. 

In Basic, the value 80 is subtracted 
from the token. The resulting value is 
used as an offset from the vector table 
address to obtain the address for the ap- 
propriate ROM routine. (The 6809 micro- 
processor's extended indirect addressing 
mode makes this easy). Control will be 
transferred to the appropriate subrou- 
tine. 

For example, suppose the word typed 
in was run. This is tokenized as 8E. When 
executed, 80 is subtracted, resulting in 
0E. This is multiplied by two (since ad- 



TOKENIZATION 



IN 




Figure 2. SN Error Routine Flow Chart 



dresses take two bytes) and added to the 
address of the vector table for Basic com- 
mands (AB67), resulting in AB83. The 
two bytes at AB83 contain the address 
AE75. The system will now jump to AE75 
and begin the process of running the 
Basic program. See Figure 3 for a flow- 
chart of this. 

In Extended or Disk Basic, control goes 
to a routine in the Disk or Extended Basic 
ROM which eventually accomplishes the 
same task. First, some special functions 
and limits are checked, and then a similar 
technique is used to find the proper ROM 
routine. 

Knowing how Basic commands are in- 
terpreted, it is possible to look at the rou- 
tines for each Basic command and study 
what happens in each. Many of the ROM 
routines have points where they jump to 
a RAM subroutine. I call these points "in- 
tercepts. " These exist to allow for expan- 
sion of the system. Most of these inter- 
cepts contain value 39, which is RTS (re- 
turn from subroutine), placed there dur- 
ing initialization. Some will contain jump 
commands to either disk or Extended 
Basic ROMs. Armed with this informa- 



EXECUTION 




AE 75 



AB 6 7 
+ 1C 

AB 83 



Figure 3. Getting Correct Values 
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tion, it is possible to study existing com- 
mands, modify them, or even create your 
own. This can lead to a highly custom- 
ized Basic language. 

Modifying Basic Commands 

One of my hardware modifications is a 
parallel printer port. It would be nice if 



some easy way to access this were avail- 
able from Basic without constantly re- 
sorting to USR functions. To see if this 

was possible, I investigated the output 

routines. The Radio Shack manuals were 
helpful here. They refer to a routine 
called CHROUT which takes the charac- 
ter in the A register and outputs it to the 
device specified by DEVNUM (location 



6F). Valid device codes (or numbers) are : 

# - 2 : the serial printer port 
#-1 : the cassette port 
#0 : the screen/keyboard 

#1 - 15: the disk buffers. Zero is the default if no 
device is specified 

Tracing the Print and Print # routines, 
I found that, as expected, they then call 
CHROUT to do the actual output oper- 
ation. 

Tracing through CHROUT I discovered 
that it checks for a valid device code (if 
the device is not valid, a device number 
error is indicated). It also transfers control 
to the appropriate subroutine which will 
actually transmit the character to the cor- 
rect device. 

To modify this for the parallel port, I 
created a new device number: - 5. The 
steps for making this a valid device num- 
ber are: 

• Intercept the device code validating 
routine. 

• Call a new subroutine when the de- 
vice number is -5. 

• Write the new output routine. 

These tasks were made easier by inter- 
cepts in both parts of Basic which check 
for the device number. These were placed 
there to allow Disk Basic to use buffers 1 
through 15. 



Program Listing 1. Routine to Force Accept- 
ance of Device Code - 5 



00100 

00110 

00120 

00130 *ROUTINESTO FORCE ACCEPTANCE OF DEVICE CODE -5 
00140 



0161 






00150 


ORG 


$0161 










00160 








0161 


7E 


0200 


00170 


JMP 


$0200 


INTERCEPT 








00180 








0200 






00190 


ORG 


$0200 




0200 


Cl 


FB 


00200 


CMPB 


$$FB 


IS DEVNUM -5? 


0202 


27 


05 


00210 


BEQ 


ACCEPT 


YES, ACCEPT IT 


0204 


D6 


6F 


00220 


LDB 


$6F 


OTHERWISE 


0206 


7E 


C838 


00230 


JMP 


$C838 


CONTINUE ON 


0209 


32 


62 


00240 


ACCEPT LEAS 


02, S 


ADJUST STACK 


020B 


39 




00250 


RTS 




RETURN 



00260 

00270 ■ ■ ■ 



Talk is Cheap! 

You want your color computer to talk, It’s easy to use, and will say 

but how much will it cost? virtually anythinq! 

$50 . . . $100 . . . $200 ... NO! 



HOW ABOUT $29 95 ? 



Talk really is cheap! 



SPEAK UP!™ is a machine language 
Voice Synthesizer program for your 
TRS-80 Color Computer/ It is 
100% software. Nothing else to buy. 
Best of all, YOU can make 
basic programs talk! 

16K and 32K versions on one cassette. 

Has text to speech capability. 

*T.M. Tandy Corp. 16k minimum 



Reviewed in the April issue of Rainbow. 

COD orders, checks accepted - NO DELAY 
WE PAY POSTAGE 
1-800-334-0854, ext. 890 
Except North Carolina 

t r 0Ul4AlCClt tftutiHty, *)hc. 

V P.o. Box 3318 
Chapel Hill, NC 27515 
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The device number validation routine 
was intercepted at location 0161 with a 
jump to 0200. At 0200, the device num- 
ber is compared with FB, the two's com- 
plement arithmetic representation for 
-5. If it is -5, the stack pointer is read- 
justed, and the program returns to the 
ROM with a valid device code. If the de- 
vice code is anything else, the program 
jumps to C838 in the Disk Basic ROM as 
if nothing had happened. 

In a non-disk system, you would use 
the appropriate Basic or Extended Basic 
location. This portion of the modified 
system RAM can be seen in Listing 1 . 

Next, the actual output handler is in- 
tercepted at 0167 with a jump to 0210. 
Again the device number is checked, and 
if equal to -5, control goes to a subrou- 
tine which will actually transmit the char- 
acter in A to the parallel port. Upon re- 
turn from this subroutine, the stack 
pointer is adjusted, and the program 
jumps back to Basic, ready to get the next 
command. If the device number is not 
-5, the program jumps to CB4A (for a 
disk system), once again as if nothing un- 
usual had happened. Listing 2 shows an 
example of this section of memory with 
the new output routine located at A2BF. 
This is actually the ROM routine which 
outputs via the serial port. With the mod- 
ification, the statements: 



10 PRINT#— 2, "TEST" 

20 PRINT #-5, "TEST" 

will accomplish the same thing. 

There is one possible pitfall to making 
this change: make all changes to system 
intercepts either in one Basic program 



line or one immediate instruction. If an 
output function is attempted while only 
some of these changes have been made, 
a massive crash will result, probably re- 
quiring a cold start to recover. ■ ■ ■ 

Next month: Creating commands, 
and more! 



Program Listing 2. Routine to Use Device 
Code -5 









00280 

00290 

00300 

00310 














00320 


*ROUTINETO USE DEVICE CODE -5 








00330 








0167 






00340 

00350 


ORG 


$0167 




0167 


7E 


0210 


00360 

00370 


JMP 


$0210 


INTERCEPT 


0210 






00380 


ORG 


$0210 




0210 


Cl 


FB 


00390 


CMPB 


#$FB 


IS DEVICE NUMBER -5? 


0212 


27 


03 


00400 


BEQ 


PARLEL 


IF SO, USE IT 


0214 


7E 


CB4A 


00410 


JMP 


$CB4A 


OTHERWISE GO ON TO THE 








00420 


*DISK PRINT ROUTINE 




0217 


BD 


A2BF 


00430 


PARLEL JSR 


$A2BF 


G TO THE SERIAL PORT 








00440 


*USED FOR ILLUSTRATION 










00450 


*YOU COULD USE YOUR OWN PARALLEL PORT ROUTINE HERE 


021 A 


32 


62 


00460 


LEAS02,S 


ADJUST STACK 


02 1C 


7E 


A2A6 


00470 


JMP 


$A2A6 


CONTINUE (PRINT) ROUTINE 








00480 






■ ■ ■ 



Analog micro Systems 




ANALOG MICRO SYSTEMS 



RDBOTH 

Computer Servo 
Controlled Robot Arm 

Keyboard or Joystick 
Control; 

Plugs Into Your Co Co; 

Remembers Everything 
It Did - 

Does It Again! 

Includes All Software: 

Includes Power Supply, 

6 Channel Servo 
Controller, 

Robot-1 and Cables 

Order Robot-1 C 
$395.00 

Also SS-50 Version 
Available 

Order Robot-1 S 
$395.00 



5660 Valmont Road 
Boulder, Colorado 80301 
(303) 444-6809 
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Robot MicronEye 
$295.00 

Free Catalog 
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1 6K Extended Color Basic 



Modified 

Basic DBM 

Changes to make Detwiler's program 
even more useful. 




W HEN I RECEIVED my premier 
issue of The Color Com- 
puter Magazine, I keyed in 
the program listing for "Your Basic 
DBM," written by Paul Detwiler. I was 
pleased and impressed by the versatility 
of the program. 

I discovered only one bug — Line 
6560, which reads: Input "Your Selec- 
tion" ;M. The problem created by this line 
is that M is used elsewhere in the pro- 
gram to store the maximum number of 
records the file will hold. Therefore, if 
you created a file and used option 4 on 
the menu, M would be overlaid by your 
selection in Line 6560. Then when you 
saved the file, the entire file would be 
saved but the maximum record parame- 
ter would be written to the tape as either 
a 1 or2. This prevents you from reloading 
the tape because it generates a sub- 
scripting error while loading, because 
the program uses this parameter to di- 
mension the D$ array. To correct this 
problem, simply change M to Ml in Line 
6560, and again in Line 6570. 

After using the program several times, 

I realized some additional changes could 



by Charles R. Jefferson 



be made to the program to make infor- 
mation retrieval easier. Below are some 
suggestions. 

Changes 

First I changed option 4 to read Search 
Records. This option does not alter the rec- 
ords in the file. Instead, it retrieves them 
based on a key or keys and displays them 
to the screen. 

The first routine I added was 5 -Sort File. 
This will order the records in ascending 
order on either one or two fields. 

The second routine I added was 7 - 
word Search. This routine asks you to enter 
a word or phase, and then retrieves all 
records with that word or phrase, it 
makes no difference what field the word 
is on or even if it is in the middle of a 
group of words. As far as I. know, the 
statement instr, which is the heart of this 



routine, is supported only by Extended 
Color Basic. Those of you without Ex- 
tended Basic should be able to rewrite 
the routine using MID$ and a string com- 
parison; however, this would run more 
slowly and use a bit more memory. 

The third routine I added was 8 — Mod- 
ify Records. This routine works like the De- 
lete routine. You must know the record 
number to be able to modify it. You will 
be asked if you know the record number, 
and if you respond n you will be asked to 
enter s to scan the file. If you respond y 
you will be asked to enter the record 
number. The routine will then display the 
first field of data from the record and ask 
you to type in new data or hit Enter for 
the next field. Your options then are to 
type in new data for that field and enter 
it, or to hit Enter and leave that field un- 
modified. This process is repeated until 
all fields are displayed for that record. 
The program then asks you for the next 
record number to modify. If you do not 
want to modify any more records, enter 
a zero and the menu will appear again. 

The fourth routine I added was 9— Load 
Another File. This is a one line routine which 
re-runs the program, clearing all dimen- 
sion statements and letting you create or 
loadanotherfile. 

I have enclosed a complete Program 
Listing for the changes and additions 
listed above. These routines add about 
1 K to the program size; however, it is 
possible under 16K or 32K Extended 
Color Basic to offset the 1 K addition and 
gain another V£K of extra memory for 
program execution and string space. 

Extended Basic 
Load Instructions 

1. Before loading the program, type 
poke 25,6: poke 26,1 and Enter. 

2. Type new. 

3. CLOAD the program. 

NOTE: This will free 31015 bytes of 
memory on a 32K machine and 14361 
bytes on a 16K machine. Do not type 
pc lear 1 because this command only 
gives you 29479 bytes on a 32K machine 
and 13095 bytes on a 16K machine. By 
using the POKEs, no high resolution 
graphics pages are reserved. You can use 
these POKEs in any program that does 
not use high resolution graphics. Set/ 
Reset graphics will work well. 

If you renumber your program using 
renum 1 , 10 , 1 , you will free about 92 addi- 
tional bytes of memory. (This renumbers 
your program by ones). 

These additions were developed on a 
32K machine. If you have a 1 6K machine, 
change the clear statement in Line 10 to 
clear 7500 to be safe. ■ ■ ■ 
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The Color Computer's better 




J 



COLORMATE unleashes the power of the Color Computer! 
It expands any standard CoCo with 16K and floppy disk 
to allow operation of SDOS, a fast, time proven 
operating system, and powerful program development 
tools like the BASIC Compiler. SDOS handles floppies ond 
optional Winchester disk transparently. BASIC provides 
very fast code, long names, true subroutines and 
powerful disk file I/O. 



Screen above is unretouched photograph of ColorMote 
display. Disk Extended BASIC is not required. 

COLORMATE is $495.00. Includes 400+ pages of 
documentation. Radio Shock floppy controller and floppy 
disk drive not included. Word processing, accounting, 
and Winchester disk drives ore available. Write or coll for 
details. Dealer inquiries invited. 



SDOS is a registered trademark of Software Dynamics. 
ColorMate is a trademark of Alta Systems Inc. 
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COMPUTER SYSTEMS DISTRIBUTORS 

P.O. Box 9769 
Anaheim, California 92802 
(714) 772-1390 
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Program Listing. DBM Mods 



1 CLS : CLEAR20000 

2 CF$=”CREATE A FILE" 

3 PRINTTAB ( 10 ) CF$ 

4 PRINT:PRINTTAB( 10 ) "SELECT 1 OR 
2 " 

5 PRINT : PRINTTAB ( 7 ) " 1-CREATE A N 
EW FILE" 

6 PRINT : PRINTTAB ( 7) "2-LOAD AN OL 
D FILE" 

7 PRINT: INPUT” YOUR SELECTI 

ON" ; I 

8 ONI GOTOIO ,206 

9 GOTOl 

10 CLS 

11 PRINTTAB ( 10 ) CF$ : PRINT 

12 INPUT"NAME OF FILE";N$ 

13 INPUT"NUMBER OF FIELDS 10 MAX 
" ; N 

14 INPUT"WHAT IS MAX# OF RECORDS 

" ;M 

15 DIMD$(M,N) 

16 FOR Z=lTON 

17 PRINT"WHAT IS NAME OF FIELD" Z 

18 INPUTF$ ( Z ) : NEXT Z 

19 CLS : PRINT"THE FILE SET-UP FOL 
LOWS" :PRINT 

20 PRINT" FILE NAME - "N$ 

21 FOR X=lTON 

22 PRINT" FIELD" X "-" F$ ( X ) :NEXTX 

23 PRINT"MAX# OF RECORDS -"M 

24 PRINT : PRINT" IS THIS CORRECT Y 
/N" : INPUTI$ 

25 IFI$="N"THENRUN 

26 IFI$=" Y"THENG0T027ELSE19 

27 Q=1 

28 CLS:PRINTTAB(10) "SELECT 1-9" 

29 PRINT:PRINTTAB(8) "1-INPUT DAT 
A" 

30 PRINTTAB( 8) "2-SCAN FILE" 

31 PRINTTAB ( 8) "3-DELETE RECORDS" 

32 PRINTTAB( 8 ) "4-SEARCH RECORDS" 

33 PRINTTAB( 8) "5-SORT FILE" 

34 PRINTTAB( 8) "6-SAVE FILE" 

35 PRINTTAB( 8) "7-WORD SEARCH" 

36 PRINTTAB ( 8 ) " 8-MODIFY A RECORD 



37 PRINTTAB ( 8) "9-LOAD ANOTHER FI 
LE" 

38 PRINT: INPUT" YOUR SELEC 



TION" ; A 

39 IFA< 0ORA> 9THEN28 

40 IF A=9 THEN RUN 

41 ONA GOSUB43,52,69,89,156,197, 
214,231 

42 G0T028 

43 CLS 

44 PRINT:PRINTTAB(10) "RECORD #"Q 

45 FORY=lTON 

46 PRINT"ENTER "F$ ( Y) : INPUTD$ (Q, 
Y) 

47 I FD$ ( Q , Y ) =" STOP" THEN 51 

48 NEXTY 

49 Q=Q+1 : IF Q>M THEN28 

50 G0T044 

51 D$(Q,Y)="": G0T028 

52 CLS 

53 P=INT ( 16/ ( N+2 ) ) 

54 FORX=lTOQ-l STEPP 

55 FORZ=X TO X+(P-1) 

56 IFZ>=Q THEN66 

57 PRINT " RECORD #"Z 

58 FORW=lTON 

59 PRINT" "F$(W) ”-"D$(Z,W) 

60 NEXTW 

61 NEXT Z 

62 PRINT" PRESS <XX> TO STOP SCAN 



63 INPUT"PRESS <ENTER> TO CONTIN 
UE" ;G$ 

64 IF G$="XX" THEN 28 

65 CLS : NEXTX 

66 PRINT : PRINT" ******LAST RECORD 
******* 

67 INPUTA$ 

68 G0T028 

69 CLS : R=0 

70 PRINT: INPUT"TO DELETE A RECOR 
D THE RECORD # MUST BE KNOWN. IS 

THE RECORD # KNOWN? Y/N";G$ 

71 IFG$="Y"THEN76 

72 IFG$="N"THEN PRINT" ENTER <S> 
TO SCAN RECORDS" ELS E6 9 

73 INPUTK$ 

74 IFK$="S"THEN G0T052 

75 PRINT"REDO" 

76 INPUT"WHAT IS THE RECORD #";R 

77 IFR>Q-1THEN75 

| more 
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SUPER PRO KEYBOARD 



• Only $69.95 

• Original key layout. 

• No special software required. 

• Fast, simple installation — no soldering. 

• Individually boxed with full instructions. 

• Professional, low profile, finished appearance. 

• U.S. made — high quality, quad gold contacts. 

• Smooth "Touch Typist" feel— no sagging. 



Rainbow, April '83 

A fine piece of hardware from Mark Data Products. ..It is 
super and it is professional too. . .If you are searching 
for a replacement keyboard, it is an excellent buy. . . 



Hot CoCo, August '83 

Like putting leather upholstery in your Volkswagen. . .Very 
impressed with the appearance and performance. . .Could 
easily pass as original equipment. . .Installation is very 
simple. . . 



Color Computer Magazine, June '83 

The installation procedure is well detailed and quite 
simple. . .Has a professional feel , reacts well to the touch. . . 
has held up to some purposeful pounding. . . 



Color Computer News , June '83 

Mark Data Products is well known to us "longtimers". . . 
Every bit as finished as if Tandy had done it. ..The 
Mark Data Super-Pro is your best buy. . .The one that 
is in my CoCo to stay. . . 




Great Computer Software Also 

• Adventure Games • Arcade Games and Utility Software 



24001 ALICIA PKWY., NO. 207 • MISSION VIEJO, CA 92691 • (714) 768-1551 

All Orders: Please add $2.00 shipping and handling in the continental U.S. All others, add air shipping and $3.00 handling. California 
residents add 6% sales tax. Foreign orders please remit U.S. funds. Software authors— contact us for exciting program marketing details. 







BLACKJACKPRO 




This is a computer aided learning turn the odds in your favor, 
tool that will pay for itself. Then the computer aided exercises 

BLACKJACKPRO's 16 programs will patiently correct your mistakes 
will condition you to make the right and train you to handle any game 
play automatically. situation until you are ready to face 

This is a practical approach to the casinos and start winning, 
mastering the probability based With BLACKJACKPRO you'll 
system that experts have been become a lifelong winner, 
winning with for years. Why wait? Simply check your 

You'll receive a guidebook to the computer on the attached coupon, 
complete winning strategy. The nine or call 1-800-223-6015. 
chapters will examine each of the Versions are now available for all 
strategies which are guaranteed to major hardware. 



Phone orders may be placed 24 hours a day by calling (212) 582-2006 
or (613) 594-7855, or toll-free at: 1-800-223-6015. 

Mail Orders and Requests for information should be sent to: 

SKILLWARE CORPORATION 
Applied Probability Dept., 

2nd Floor, 314 West 53rd. Street New York, New York 10019 

BLACKJACKPRO is a trademark of: SKILLWARE CORPORATION. 

APPLE II, ATARI, COMMODORE, IBM, and TRS-80 Color Computer, are trademarks of 
Apple Computer Inc., Atari Inc., Commodore Electronics Ltd., 

International Business Machines, and Tandy Corp. 
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is not a game 



Please send me □ One, □ 

1 BLACKJACKPRO tutorials 
@ $49us ($60 cdn) each. 

For: □ APPLE II □ IBM PC. 

□ ATARI 400/800/1200 
COMMODORE □ 64 □ Vic 20 

□ TRS-80 Color Computer 

With:D Diskette □ Cassettes 
Total Amount Enclosed $ 



N.Y. State Residents please add Sales 
Tax. Please allow Two Weeks for 
personal checks to clear. 

Name: 



State:. 



_Zip:. 



□ 

Acct# 

Expiry Date. 
Signature: 



□ VISA 






SKILLWARE CORPORATION 





78 IFR=0THEN28 

79 FORX=R TO Q-2 

80 FORV=lTON 

81 D$ ( X / V) =D$ ( (X+l) ,V) 

82 NEXTV 

83 NEXTX 

84 FORL=lTON 

85 D$(X,L)="" 

86 NEXTL 

87 Q=Q-1 

88 G0T028 

89 K=0 

90 GOSUB117 

91 RETURN 

92 CLS : K=0 

93 PRINT"WHAT FIELD WILL YOU SEA 
RCH ON" :PRINT 

94 FORZ=lTON 

95 PRINTTAB (8)Z"-"F$(Z) 

96 NEXT Z 

97 INPUTE 

98 IF E<0ORE>N THEN93 

99 INPUT" FIELD DATA TO SEARCH 0 
N";Q$ 

100 CLS 

101 FORZ=lTO Q-l 

102 IFQ$=D$ ( Z f E ) THEN GOSUB107 

103 NEXTZ 

104 PRINT" * **ALL RECORDS FOUND** 
* " 

105 INPUT" PRESS <ENTER> FOR MENU 
" ;L$ 

106 RETURN 

107 PRINT" RECORD #"Z 

108 K=K+1 

109 FORW=lTON 

110 PRINTF$ (W)"-"D$(Z,W) 

111 NEXTW 

112 P=INT (16/(N+2) ) 

113 IFK<P THEN RETURN 

114 INPUT"PRESS <ENTER> TO CONTI 
NUE" ;B$ 

115 K=0 s CLS 

116 RETURN 

117 CLS 

118 PRINT: PRINTTAB (10) "SELECT 1- 
4" 

119 PRINT:PRINTTAB(3) "1-STRING M 
ATCH ON 1 FIELD" 

120 PRINTTAB( 3) "2-STRING MATCH O 
N MULTIPLE" 

121 PRINTTAB(5) "FIELDS" 

122 INPUT" YOUR SELECTIO 

N" ; Ml 

123 IFM1<OORM1>4THEN117 

124 ON Ml GOSUB92 ,126 



125 RETURN 

126 CLS : K=0 

127 PRINT : PRINT "WHAT FIELDS WILL 
YOU SEARCH ON (2 MAX)" 

128 FORZ=lTON 

129 PRINTTAB (8)Z"-"F$(Z) 

130 NEXT Z 

131 INPUT" FIELDS A,B";U f V 

132 PRINTsPRINTTAB(lO) "WHICH LOG 
IC" 

133 PRINT : PRINTTAB ( 14 ) " 1-AND" 

134 PRINTTAB ( 14 ) " 2 -OR" 

135 PRINTTAB ( 14 ) " 3 -NOT" 

136 INPUT T 

137 PRINT"DATA FOR FIELD"U 

138 INPUT U$ 

139 PRINT" DATA FOR FIELD"V 

140 INPUT V$ 

141 IFT=1 THEN144 

142 IFT=2 THEN148 

143 IFT=3 THEN152ELSE132 

144 CLS : FORZ=lTOQ-l 

145 IFU$=D$(Z,U)AND V$=D$(Z,V)TH 
EN GOSUB107 

146 NEXTZ 

147 GOTO104 

148 CLS : FORZ=lTOQ-l 

149 IFU$=D$(Z,U)OR V$=D$ ( Z , V) THE 
N GOSUB107 

150 NEXTZ 

151 GOTO104 

152 CLS : FORZ=lTOQ-l 

153 IFU$=D$ ( Z , U ) AND V$=D$(Z,V)TH 
EN NEXTZ ELSE G0T0154 

154 IF U$=D$(Z,U) OR V$=D$(Z,V) 
THEN NEXTZ ELSE GOSUB 107:NEXTZ 

155 GOTO 104 

156 CLS: PRINTTAB ( 8 ) "1-SORT ON ON 
E KEY" 

157 PRINT: PRINTTAB ( 8) "2-SORT ON 
TWO KEYS" 

158 PRINT :PRINTTAB( 8) "YOUR SELEC 
TION" 

159 INPUTS 

160 FORX=lTON 

161 PRINTX" -" F$ ( X ) 

162 NEXTX 

163 IFS=1 THEN PRINT : PRINT"SELEC 
T FIELD" :GOTO 166 

164 IFS=2 THEN PRINT : PRINT"SELEC 
T 2 FIELDS ( 1/2) " :GOTO180 

165 G0T0156 

166 INPUT Kl 

167 IF KKl OR K1>N G0T0156 

| more 
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TRS-80 + MOD I, III. COCO, TI99/4a 
TIMEX 1000, OSBORNE, others 



GOLD PLUG - 80 



Eliminate disk reboots and data loss due to oxi- 
dized contacts at the card edge connectors 
GOLD PLUG 80 solders to the board edge con- 
nector Use your existing cables, (if gold plated) 




COCO Disk Module (2) 
Ground tab extensions 
Disk Drives (all R.S.) 
Gold Disk Cable 2 Dnve 
Four Drive Cable 






$16.95 

INCL 

$7.95 

29.95 

39.95 



USA shipping $1 .45 Can/Mex $4 

Foreign $7. Don’t wait any longer TEXAS 5% TAX 

Available at you r favorite dealer or order direct from 



E.A.P. CO. 

P O. BOX 14 
KELLER, TEXAS 76248 
(817) 498-4242 

+ trademark Tandy Corp 





MC/VISA 
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CMJ-IF 

MULTI-FUNCTION 
PLUG-IN CARTRIDGE 

FOR 

TRS 80C 
& TDP 100 

COMPUTERS 

PROVIDES 

* TEXT TO SPEECH * 

AN EXTENDER • 2 PARALLEL PORTS 
• 2 COUNTER/TIMERS • 1 SERIAL COMM. LINE 
• SPEECH SYNTHESIS 
• 4 OR 8K EPROM/ROM SPACE 

• INTERFACE FOR ‘CMJ-TU *(CW, RTTY, 

SSTV, FAX) 

MAGNUM DISTRIBUTORS INC. 

1000 S. DIXIE HWY. W. #3 
POMPANO BEACH, FLORIDA 33060 
TLX. 514365 305-785-2002 



168 S=0 

169 F0RX=lT0Q-2 

170 IF D$(X,K1)<=D$(X+1,K1) THEN 
177 

171 FOR J=1T0N 

172 S$=D$(X,J) 

173 D$(X,J)=D$(X+1,J) 

174 D$ ( X+l f J ) =S$ 

175 NEXT J 

176 S=1 

177 NEXTX 

178 IF S=1 THEN 168 

179 RETURN 

180 INPUT K1,K2 

181 IF KKl OR K1>N THEN 156 

182 IF K2<1 OR K2>N OR K2=Kl THE 
N 156 

183 S=0 

184 FOR X=lTO Q-2 

185 Kl$=D$(X,Kl)+D$(X,K2) 

186 K2$=D$ ( X+l , K1 ) +D$ ( X+l f K2 ) 

187 IF Kl$ <=K2$ THEN 194 

188 FOR J=1T0N 

189 S$=D$ ( X , J ) 

190 D$(X,J)=D$(X+1,J) 

191 D$ ( X+l ,J ) =S$ 

192 NEXT J 

193 S=1 

194 NEXT X 

195 IF S=1 THEN 183 

196 RETURN 

197 CLS :PRINT@135, "SAVE FILE ON 
TAPE" :PRINT@294, "READY CASSETTE" 
:PRINT@388, "PRESS <ENTER> WHEN R 
EADY” 

198 INPUTA$ 

199 OPEN"0" ,#-l,N$ 

200 PRINT# -1 , N , M 

201 FORX=lTOQ-l 

202 FORZ=lTON 

203 PRINT# -1 , F$ ( Z ) f D$(X f Z) 

204 NEXTZ : NEXTX 

205 CLOSE #-l : RETURN 

206 CLS : INPUT"WHAT IS FILE NAME" 
;N$ 

207 CLS:PRINT@136, "LOAD FILES FR 
OM TAPE" :PRINT@235, "REWIND TAPE" 
:PRINT@300 f "PRESS PLAY" :PRINT038 
8, "PRESS <ENTER> WHEN READY" : INP 
UTY$ 

208 OPEN" I" ,#-l f N$ 

209 INPUT# -1 / N,M:Q=1:DIMD$(M,N) 

210 IF EOF ( -1 ) THEN 213 
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211 FOR Z=1T0N:INPUT#-1,F$(Z) ,D$ 
(Q f Z) : NEXTZ 

212 Q=Q+1 : GOTO210 

213 CLOSE# -1 : G0T028 

214 CLS : PRINTTAB ( 4 ) "WORD/PH ARSE 
SEARCH" 

215 PRINT :PRINT"WORD OR PHRASE T 
0 SEARCH FOR" 

216 INPUTS$:SW=0 

217 CLS : K=0 

218 FORZ=lTO Q-l 

219 FORX=lTON 

220 IF INSTR (D$(Z,X) , S$ ) THEN GO 
T0221 ELSE G0T0227 

221 SW=1 : PRINT" RECORD #"Z:K=K+1 

222 FORW=lTON 

223 PRINT" ”F$(W) ”-"D$(Z,W) : NEXT 
W 

224 P=INT ( 16/ ( N+2 ) ) 

225 IFK<P THEN 228 

226 INPUT"PRESS <ENTER> TO CONTI 
NUE " ; B$ : K=0 : CLS 

227 NEXT X 

228 NEXT Z 

229 IF SW=0 THEN PRINT"***NO MAT 
CH***" ELSE PRINT” ***ALL MATCHES 

FOUND***" 

230 INPUT" < ENTER > FOR MENU"?S$:R 
ETURN 

231 CLS : R=0 

232 PRINT: INPUT"TO MODIFY A RECO 
RD THE RECORD # MUST BE KNOWN. 

IS THE RECORD # KNOWN ? Y/N";G$ 

233 IF G$=" Y" GOTO 236 

234 IF G$="N" THEN PRINT"PRESS < 
S> TO SCAN FILE" ELSE GOTO 231 

235 INPUTK$ : IF K$="S" THEN G0T05 
2 

236 CLS : PRINT" ENTER A ZERO TO EX 
IT" 

237 INPUT" WHAT IS THE RECORD #"; 
R 

238 IFR=0 THEN RETURN 

239 CLS 

240 FORX=lTON 

241 PRINTF$ (X) ”-"D$(R,X) 

242 INPUT" ENTER NEW DATA OR PRES 
S ENTER FOR NEXT FIELD" ;Q$ 

243 IFQ$=" " THEN 245 

244 D$(R,X)=Q$ 

245 NEXTX 

246 G0T0236 ■■■ 



Tax Relief! 

With Coco- Accountant II 

If you pay taxes, you need Coco-Accountant II! 
This 32K home and small business accounting pack- 
age has everything you need to track your finances 
and make income tax time a breeze. Spend a few 
minutes each month with your canceled checks, 
cash or credit card receipts and pay stubs (or save it 
for one gruesome session on April 14). Either way, 
Coco-Accountant II will list and total expenses and 
income by month, account or payee, provide a year- 
to-date summary by account and figure your net 
cash flow. It even prints a spreadsheet showing 
your year at a glance. 

Special features flag deductible expenses and 
payments subject to state sales tax. It even calcu- 
lates the sales tax you paid! Includes a separate 
program to balance your checkbook and print a 
reconciliation statement. Sorts by date, lists most 
functions to screen or printer and saves files to tape 
or disk. Up to 450 entries per file on 32K tape ver- 
sion, 500 on 32K disk and 700 on 64K disk. And 
here's the best part. Coco-Accountant II is only 
$24.95 on tape, $27.95 on disk. Send orders to: 

Federal Hill Software 
825 William St. 

Baltimore, MD 21230 
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NEWERR0R CAT# DM008 16K $19.95 (CAN) $16.95 (US) 

NEWERR0R WILL PROVIDE four extra functions and abilities for your 
Color Computer. 

1. Give you an audible error warning. 

2. Provide full English error messages. 

3. Add the ON ERROR GOTO command to BASIC 

4. Allow simulated errors for debugging. 

As AN ADDED BONUS WE INCLUDE A SECOND M/L PROGRAM THAT YOU CAN ADD TO 
YOUR OWN BASIC PROGRAMS TO PROVIDE THEM WITH THE ON ERROR GOTO 
FEATURE. YOU MAY USE THIS PROGRAM EVEN IN PROGRAMS YOU SELL. 

EXECCART CAT# DM009 64K $17.95 (CAN) $14.95 (US) 

EXECCART IS A M/L PROGRAM THAT ALLOWS YOU TO COPY R0MPAC PROGRAMS TO 
tape. They can then be loaded back into a 64K CoCo and examined or 

MODIFIED. You CAN RUN MOST OF YOUR R0MPAC 'S FROM DISK WITHOUT EVER 
HAVING TO REMOVE THE DISK CONTROLLER. THIS SAVES TREMENDOUS WEAR AND 
TEAR ON THE CONTACTS. EXECCART MAY ALSO BE USED TO ADD A LOADER TO 
YOUR OWN PROGRAMS TO TURN ON 64K AND TO COPY YOUR BASIC ROMS INTO RAM 
SO THAT YOU CAN MAKE MODIFICATIONS. 

THE SPOOLER CAT# DM010 16K $12.95 (CAN) $10.95 (US) 

Whenever you use your printer, your computer is totally dedicated to 

FEEDING IT. THIS ISN'T SUCH A PROBLEM WHEN YOU JUST WANT TO PRINT OUT 
A COUPLE OF LINES, BUT LLISTlNG A LONG PROGRAM CAN BE VERY BORING. IF 
YOU HAVE BETTER THINGS TO DO THAN SIT AROUND WAITING FOR THE PRINTER, 
THEN "THE SPOOLER" IS JUST WHAT YOU NEED. 

THE SPOOLER will work on ANY TRS-80 Color Computer from a 16K right up 
to 64K with disks. Extended BASIC is NOT required. 



ADD 3% SHIPPING & HANDLING PER ORDER-MINIMUM $2.50 



WE ARE THE CANADIAN DISTRIBUTORS FOR THE FOLLOWING 
| FINE COMPANIES 

•adventure international 'ARCADE ANIMATION, INC 
, *AMDEK *ARK ROYAL GAMES 'BUMBLEBEE SOFTWARE* 
'BYTE BOOKS 'C0L0RQUEST 'COMPUTER SYSTEMS CENTER* 
'C0MPUTERWARE 'DATAS0FT 'DRAGON COMPUTERS* 
*DSL COMPUTER PRODUCTS 'ELITE SOFTWARE 'ENDICOTT*' 
'FACIT PRINTERS 'FOLLETT LIBRARY BOOK COMPANY* 
'FRANK HOGG LABORATORY 'HAYES BOOKS 'HOMBASE* 
, 'INTRACOLOR *J & M SYSTEMS 'MARK DATA PRODUCTS* 
'MED SYSTEMS 'MICRO WORKS 'OSBORNE BOOKS* 
'PRENTICE-HALL 'PRICKLY PEAR 'PRISM SOFTWARE* 
'RAINBOW CONNECTION SOFTWARE 'REAL SOFTWARE* 
, 'SOFTLAW CORPORATION 'SPECTRAL ASSOCIATES* 
| 'SPEECH SYSTEMS 'SUGAR SOFTWARE *SYBEX BOOKS* 
*T. C. E. 'PROGRAMMERS GUILD *TOM MIX SOFTWARE* 
'TRANSFORMATION TECHNOLOGIES 'WEST BAY C0MPANY r 
'WASHINGTON COMPUTER SERVICES 'ZENITH* 



1 THE 
DAT MAN I 



420 FERGUSON AVE N 
HAMILTON. ONTARIO 
CANADA L8L4Y9 
PHONE 416-529-1319 



X DEALER 
INQUIRIES 
WELCOME 



SEND $3 FOR OUR NEW 80+ PAGE CATALOGUE 
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* 364,000 BYTES! 



COLOR TERM + PLUS + 

§2,9-9^ Now even more +PLUS+ features than before!!! $3g 
New and Improved!! 

v An Intelligent Terminal Program For The Color K) 
Computer or TOP 100 

+ Communications BAUD rate: 110-19200 
+ Change printer BAUD rate: 600-9600 
+ Select printer line feeds if needed 
+ Select Half or Full Duplex 
+ Select Odd, Even, or No Parity 
+ Select 7 or 8 Bit Words 
+ Select 1 or 2 Stop Bits 
+ Send Control Characters 
+ Separate Keys for Escape & Delete (Rubout) 

+ Turn off those UGLY Lower-case letters 
+ Word Wrap — eliminate all split words ^ 

+ Selectable Reverse or Normal Video » e>v 
+ Scroll protect up to nine lines 
+ Automatic capture of incoming files 
+ Send one line at a time from your buffer 
+ Has programmable prompt for “send next line” 

+ Disk version extras: List Directory, Granules 
+ Buffer Size Indicator 
+ Complete up and down load support 
+ Improved buffer editor in both versions 
+ On/Off Line Cassette/Disk Reads & Writes 
+ Save & Load Machine Code, BASIC Programs or Files 
+ On/Off Line Scrolling of Buffer Dealer inquiries 

+ Pre-enter Data before going on line invited. 

+ Easy to read manual is included with each program 

PRICE $29.95 (Tape) $39.95 (Disk) 16k or 32k Req. 

COLOR DISK SAVER 

Saves a disk to tape. Reloads disk from saved tape. Also 
has tape verify command! 32k Ext. BASIC Req. 

PRICE $12.95 (tape)** D 







%■ 









COLOR BIORHYTHM Are you up or down today, 
tomorrow, or years from now? Find out with COLOR 
BIORHYTHM. Uses high res graphics. Send the chart to 
printer. 16k or 32k Ext. BASIC Req. 

PRICE $14.95 (tape) D 




'• r 

That’s right! Using your 64K Color Computer, and an 80 track 
drive, you too can have more than TWICE as much storage on 
your disk drive system. DOUBLE DOS BASIC allows you to 
use 35, 40 or 80 track (double or single sided) drives all on one 
system, all at the same time! Your system could consist of a 35 
track drive, a two drive AMDEK system, and an 80 track drive, 
all working, and hooked up to your system! (The AMDEK 
drives are 40 track drives.) ALL commands are supported in 
DOUBLE DOS BASIC. The DOS is totally transparent to your 
BASIC programs! If your system selection is 80 tracks, a PRINT 
FREE command will return 158 granules! Compare this to the 
68 granules your system now returns! The 40 track drives 
would return 78 granules, 10 more than the 35 track system. 
EVERY command in BASIC is supported by DOUBLE DOS 
BASIC. If you haven’t already upgraded to 64K, now is the 
time! Use your system to its FULLEST! DOUBLE DOS BASIC 
also gives you RESET PROTECTION, unlike most of the other 
64K programs. AND, used with our ROM MOVE program, you 
can also get another 8000 bytes of BASIC addressable memory! 
DOUBLE DOS BASIC - $24.95 /■ ' \ 

ROM MOVE - $12.95 O f NeW# O 

DOUBLE DOS & ROM MOVE - $29.95 V / 

DOUBLE MAILER O O O 

At last a powerful, easy to use, mailing list program for a 
reasonable price. Up to 200 names can be held in memory for 
you to change or print as you like. Plus, you can print out up to 
1800 names without touching the keyboard. The machine 
language sort routine will sort 200 names in as little as 6 
seconds! Supports single or double labels. Three and four line 
labels can be intermixed at will, the print out will adjust 
accordingly. All this and much more! 

Price: $19.95; Tape $21.95; Disk (32K Req.). 

COLOR KEY COMMAND 

☆ ☆☆☆☆☆☆☆☆☆☆ 
Looking for a powerful programmer’s aid, but you don’t have 
a fortune to spend? This program is for you! Look at these 
features: two keystroke entry of more than 80 Basic, Extend- 
ed Basic, and Disk Basic commands. Select the color of your 
cursor. Select the prompt you want — no more “OK’’ when a 
program bombs! Automatic line numbering — you select the 
start line and increment! 4 custom programmable keys for a 
total of 64 characters each — enter whole lines with two key 
presses! Copy any line with the copy command. Merge tape 
programs together automatically. Redefine any or all keys 
with a short basic program we supply. 

Not all features are available on every machine; some require 



P Util re! 32K ext. BASIC Req. 

PRICE $26.95 Disk only Extended or Disk Basic to work properly. 



AUTO LOAD Auto Load will put any program or file 
from tape to disk! All machine language programs that 
load below the top of your disk system are modified so 
that they will operate properly with a disk system! 

16k or 32k Ext. BASIC Req a . UNDERGROUND 

PRICE S12.95 (tape)* * Ai) V 

Save!! 

FREE PROGRAMS!! 16K or 32K Re( i- PRICE 81895 ( ta P«)' D 

Get a FREE utility program when you buy a copy of COLOR KEY COMMAND! Your choice of COLOR DISK SAVER, DI) CLOCK, SUPER 

PEEKER, TAPE NAME, AUTOLOAD, or CURSOR II. Save up to $12.95! COLOR KEY COMMAND is only $18.95 (Tape) * D. 

AND THAT’S NOT ALL!!! Buy COLOR TERM +PLUS+ and the SUPER PRO keyboard and pay only $59.95 for the keyboard! 

AMDEK DISK SYSTEM!! This is one of the hottest selling new items to come along in years! AMDEK DISK DRIVE only $499.00 

Save $100.00!! Buy an AMDEK DISK DRIVE and our RS CONTROLLER together and pay only $649.00! We’ll throw in the cable FREE!! 

ROM SWITCH 

Change from BASIC to EXTENDED BASIC, to DISK BASIC and back again with ROM SWITCH! You can even press the RESET button, and 

with one POKE, restore the system! PRICE $9.95 64K required * D. 

[DOUBLE CABLE 

If you are tired of switching cables every time you need to use your MODEM and PRINTER together, this is the fix! Only $14.95. 

GALACTIC MATH , 

# , 



Load this game into your computer and start playing! This is a 
math tutor that is really an arcade game! Keep those saucers 
from landing! There are no “happy faces’’ or “funny 
clowns’’ in this math program. 

16K or 32 Ext BASIC Req. PRICE $15.95 (tape) D 

COLOR COMPUTER/TDP-100 Q ^ 

veil 







* All machine code D Disk Compatible 

$2.00 shipping and handling on all orders. No extra charge on 
COD orders, Mastercard and VISA accepted. Texas residents 
add 5% sales tax. Allow two weeks for personal checks. 
Send 20 cent stamp for free catalog. 






SUPER-PRO 

REPLACEMENT KEYBOARD KIT 



$ 64.95 



4 * 





920 Baldwin Street 


■IB 




Denton, Texas 76201 
Phone 817/566-2004. 
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Color Computing for Kids 

If. . . then. . . else statements and more! ■ml VI 




by Jean Plesser 

rLASH!'! 

-The K«Ngdoiv\ 
OP ShdMROCK 
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luckv ^-i_eap 
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T HIS COLUMN began in the September 1 983 issue. That was six months ago, so : IF you've followed all my articles 

THEN your computer experience = six lessons; ELSE if you missed any articles THEN your experience is < (less than) six 
lessons; ELSE if you've followed all the articles and have gotten information on your own, THEN your experience is > 
(greater than) six lessons. 

These words and symbols (IF, THEN, ELSE, <,>,=) may be a little awkward when used 
in a paragraph this way, but they' re very meaningful and useful in computer programs. 16K Color Basic 

There are times when a pro- 
gram's variables need to be 
compared (or tested) so that a 
different action can be taken for 
each possibility: IF A = BTHEN; 

IF A > BTHEN; IF A < BTHEN; 

IF A<> BTHEN. ..ELSE; IF A 
+ B>C x D THEN. ..ELSE; IF C = 

> DTHEN; IF B < + ATHEN... 

There are many other com- 
binations possible with these 
statements; we'll use some in 
programs so you can see them 
work. The symbols < (less 
than), > (greater than), and = 

(equal to) are called operators ; 
they help us find the largest, 
smallest or equal variables in a 
program. We will use the 
operators to compare numbers, 
to compare letters in a pro- 
gram that will alphabetize 
names (IF L$<R$ THEN...) and 
we'll use the operators to test 
the INPUT response in a game 
program. 

IF you've been following 
"Color Computing for Kids, " 

THEN you know to expect at 
least one fun program (that uses 
our lesson along with the month's 
holiday or theme), ELSE you 
would be very disappointed. In 
honor of St. Patrick's Day, I've 
written "Shamrock's Crown," a 
game that takes skill along with 
a little luck of the Irish. Before 
we get to that we have a few 
things to learn. 

Just How Smart 
Is A Computer? 

Computers do only what we 
program them to do; if we make 
a mistake, they'll make mistakes 
or give us an error message. 

Programmers have been known 
to yell at their computers when 
errors appear in their output. 

Maybe you've even felt that 
same frustration, but, as all 
programmers soon learn, 
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EDUCATIONAL 

PROGRAMS 



believes your Color Computer 
is a unique teaching tool. 

Our programs have been created by 
teaching professionals to give your chil- 
dren the help they need. B5 incorpo- 
rates fun with basic learning skills. 

4*CLOCK Grades 1-4 

16K Cass. $24.95, 32K Disk $26.95 

4*MONEY Grades 2-A 
16K Cass. $19.95, 16K Disk $21 .95 

4*BORROW Grades 2-4 
16K Cass. $19.95, 32K Disk $21 .95 

4*C ARRY Grades 2-4 
16K Cass. $19.95, 32K Disk $21 .95 

4*MATHFACT Grades 1-5 
16K Cass. $16.95, 32K Disk $18.95 

QUESTION Grades 1-8 

16K Cass. $19.95, 32K Disk $21.95 

HANGWORD & SCRAMBLE Grades 1-8 
16K Cass. $14.95, 32K Disk $16.95 

SPELLING Grades 1-8 

16K Cass. $16.95, 32K Disk $18.95 

KEYBOARD Grades 1-6 

16K Cass. $19.95, 32K Cass. $24.95, 32K 

Disk $26.95 

ABC’S Grades K-1 

16K Cass. $9.95, 16K Disk $11.95 

SKIP COUNTING Grades 1^4 
16K Cass. $16.95 

( DATA TAPE LISTINGS ) 

Data Tapes may be used with other B5 programs. 
They cannot be used alone. 

Use with Keyboard Program 
KEYBOARD PHONIC DRILL - Letter, word and sen- 
tence finger drills using common vowel and conson- 
ant combinations. $8.95 

Use with Keyboard. Spelling or Hangword Programs 
DOLCH WORDS - 273 words used most often in be- 
ginning readers. $8.95 

GRADE LEVEL SPELLING - Over 300 words on each 
tape. Each lesson follows a phonic rule. Available in 
Grades. 2, 3, 4, 5or6 levels. $8.95 per grade level 
SPACE WORDS - Over 300 words to challenge and 
motivate the superior speller. Grades 4-8. $8.95 
ADULT WORDS - Most often misspelled words. Highly 
challenging. $8.95 

Use with Questions Program 
NOUNS AND VERBS - 4 lessons on nouns and 4 on 
verbs, grades 3-5. $8.95 

READING COMPREHENSION - Lessons build from sim- 
ple to complex. Grades 2-4. 

Main Idea $10.95 

Sequencing $10.95 

Fact 8t. Opinion $10.95 

Cause & Effect $10.95 

Complete Series of 4 $39.95 

Ask your Dealer for a 
Demonstration today! 
BROCHURES 
UPON REQUEST 

If unavailable locally, send check 
or money order to: 

B5 Software 

1024 BAINBRIDGE PLACE 
COLUMBUS, OHIO 43228 
(614)276-2752 

Free Shipping in U.S.A. & Canada 

(OH Residents add 5V2% Sales Tax) 



"to err is human'-computers simply obey. 

As you use operators to compare and 
sort data, it will be important to double- 
check your statements for accuracy and 
logic. Using logic is simply thinking out 
each step you must take to accomplish 
something. Remember, the computer 
doesn't know how to do anything with- 
out your giving it the logic , so if you miss 
a step or give it a wrong instruction it 
can't do the job correctly. Practice logic 
by thinking about telling your computer 
how to wash a car. You have to tell it 
where to find everything it needs, howto 
turn the hose on and off, how to wash 
each part, when to rinse, dry, clean the 
windows and so on. If you leave anything 
out you may end up with a running hose, 
an unwashed fender, dirty windows, or 
worse — a window that wasn't closed 
before the car was sprayed with water! 
Programmers must be careful and exact, 
but like all things, this comes with prac- 
tice and will help you in many other areas 
of communications. 

Computers rely on us for instructions, 
but we rely on them for speed. Comput- 
ers work so incredibly fast we gladly take 
on the challenge of teaching them how 
to do our work for us. Once we give the 
computer instructions we can sit back, 
relax, stop thinking for awhile and let 
those mighty microchips go to work. 
Now let's give your computer a job to 
work on. 

Find the Largest Number 

As you enter Listing 1 into your com- 
puter's memory, read the explanations 
that follow for each line : 

Line 10 is a remark statement (REM) 
that tells what the computer does. 

Line 20 clears the screen. 

Line 30 PRINTS a blank line at the top 
of the screen. 

Lines 40 and 50 are INPUT statements, 
so you can enter two numbers into the 
program 

Line 60 tests if the number you en- 
tered for A is equal to the number you 
entered for B. If the test is true (A=B) 
THEN the computer will GOTO the PRINT 
statement in Line 1 1 0. If the statement is 
false the computer will go on to the next 
program line. 

Line 70 tests if A is greater than B. If 
that test is true, THEN the computer will 
GOTO Line 90. ELSE, when both tests 
have failed, the computer will print B; "is 

GREATER THAN"; A. 

Line 80 sends the computer back to 
Line 30 and the program will repeat until 
you press the BREAK key. 

Lines 90 through 120 are executed as 
a result of GOTO statements when a test 
is true, and the computer always returns 




to Line 30. 

After you RUN this program a few 
times you'll probably wonder why you 
really need it since you already know 
which number is largest when you enter 
them. The program isn't very helpful as 
it stands, but the logic and structure of 
the statements is important for future 
programs of your own. You won't al- 
ways know what the numbers in a pro- 
gram are, but the logic remains the 
same. 

Re-write the program to find the 
smallest number. You can use the < sym- 
bol and change the wording of the PRINT 
statements. 

There will be times when you'll want 
to compare several numbers in a pro- 
gram. The logic involved is to compare 
one single variable with all the others in 
a statement. We can do this by using the 
word and, which is also an operator. 

Program Listing 2 shows you how to 
do this using three different variables. If 
you had more variables, you would just 
add more AND operators, more state- 
ment lines for testing each variable, and 
more PRINT statements. Type new, then 
enter Listing 2. 

Line 70 tests if A is equal to, or greater 
than B AND C. The test must be true for 
both variables before the computer will 
GOTO Line 110. 

Line 80 — if Line 70 was false the com- 
puter will go to this line. Here the com- 
puter tests the variable B. If B is equal to 
or greater than A AND C, THEN the com- 
puter will GOTO Line 130. If this condi- 
tion is also false the computer will go on 
to the next line. 

Line 90 is executed when Lines 70 and 
80 have been false. The computer now 
knows that C is the largest number, or, 
if it is equal to another number, it still re- 
mains the largest number entered. 

Once again, change this program to 
find the smallest number entered. For 
further practice add two variables to- 
gether and find the largest or smallest of 
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the two totals. Here's an example of a 
test statement and a PRINT statement: 

70 IFA+B=>A+C THEN 110 
110 ? "THE TOTAL OF" ; A; " + ";B; " IS GREATER 
THAN";A;" + ";C 

Try changing the variables and the 
wording of the PRINT statements. Also, 
take some time to try out different ways 
to compare numbers. 

lsA<Or>Z? 

Alphabetizing means to put words or 
letters in the order of the alphabet. A 
word beginning with A would come be- 
fore a word beginning with B, and so on. 
The computer alphabetizes by using the 
same operators we used to compare 
numbers, but we will now be using string 
($) variables. 

The smallest value given to a letter is A, 
and Z is the largest value, so A < Z. In a 
program that alphabetizes names, the 
computer compares string data. For an 
example, if N$="Jean" and D$="Robert", 
the test statement would be: if n$ < d$ 
then... The computer would look at the 
data in N$, then it would look at the data 
in D$, and compare them. Since "Jean" 
is less than "Robert" the statement 
would be true. 

The alphabetizing program I've writ- 
ten uses an array to store the list of 
names that are INPUT into the program 
and another array to store the names in 
alphabetical order. The computer will 
then be comparing subscripted data. For 
example, N$(1) ="Jean" and N$(2) = 
"Robert," so the test statement would 
read: IF N$(i) < N$(2)THEN... and the com- 
puter would look at the data in N$(1), 
then the data in N$(2). (A subscript is a 
number attached to a variable string that 
uses the same variable to identify differ- 
ent data. The subscript gives each data 
entry a numerical order, or precedence.) 
When the lesser value name is found the 
computer will be instructed to cross out 
the name in the N$ list and place that 
name in the subscripted alphabetical 
array. You may want to look back at last 
month's article for a review on arrays. 

An Alphabetizing Program 

After you enter the alphabetizing pro- 
gram (Listing 3), carefully read the expla- 
nation that follows it. 

The Variables: 

N$() = an array for the list of names 
that will be INPUT. 

AN$0 = an array for the list of names 
as alphabetized. 

L,P and A = variables that will contain 
values used in subscripts. 

So I can better explain the program to 
you, use these names for the INPUT: 

PAULA, JEFF, DIANE, STEVE, DAVID. 

Line 20 dimensions (DIM) N$ and AN$ 




There are, after all, better ways to 
spend a day. 



1 1 can think of half a dozen things I’d rather do than type all day. Please send me 
i the tapes for the months I’ve listed below. 



| □ MC □ VISA 

i Account # 



j Exp. 

Or send check 
or money order 



I MAIL TO: 



1SSGE* 


QTY. 


PRICE 


S&HEA. 


TOTAL 






$9.95 


$1.50 








$9.95 


$1.50 








$9.95 


$1.50 








$9.95 


$1.50 




1 -YEAR SUBSCRIPTION $99.95 (S & H INCL.) 









Marne 



Address 



Zip 



The Color Computer Magazine Tapes 

Highland Mill, Camden, ME 04843 

*March & April are combined. CC Space Trek and Banner Program not included. 
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NOW AVAILABLE! 

Skyline’s Risk-Free diskettes 
and data cassettes — so good 
that they’re guaranteed for as 
long as you own them! 

Our single sided double density diskettes 
are certified 100% error-free, and meet 
or surpass every standard for accurate, 
reliable, long-life that can be applied to 
mini or microcomputer media. From the 
magnetic coating to the outside of the 
jacket, only the highest quality materials 
and production techniques are used. 
Diskettes are supplied in a ten-pack with 
Tyvek sleeves, a dozen color-coded 
labels, and 18 write-protect tabs for only 
$19.95. See our guarantee below. 

10 diskettes, sleeves, labels, and write 
protect tabs — $19.95 

Skyline’s Risk-Free Data Cassettes are 
manufactured with the same attention to 
quality as our diskettes, and carry the 
same incredible guarantee! The profes- 
sional grade 5-screw shells use stainless 
steel pins, flanged guide rollers, and phos- 
phor bronze springs for long, reliable life. 
They are wound with AGFA PE 61 1/81 1 
premium grade tape — the highest priced 
non-chrome tape available! One dozen 
C-10 tapes, 12 poly boxes, and 30 labels 
are value-priced at only $8.00! 

Order today. 

12 data cassettes, boxes, and labels 
— $ 8.00 



Skyline’s 
“No Bull” 
Media 
Guarantee: 



Skyline Marketing Corp. warrants that each 
Risk-Free diskette or data cassette sold 
shall be error free, and will remain that 
way for the life of the media. 

If a diskette or data cassette EVER fails, 
immediate replacement will be made on 
receipt of the defective media and proof 
of purchase. 

Add $2 S&H on each order 

Skyline Marketing Corp. 

4510 W. Irving Park Rd. 

Chicago, IL 60641 
(312) 286-0762 







Turn to pages 28 and 29 for 
MORE! 



for five names. 

Lines 50 to 80 are the INPUT section. 
L's value will subscript each name we 
enter. When all the names have been en- 
tered the N$ array will contain: N$(i)= 
"PAULA" ; N$(2)= "JEFF" ; N$(3)= "DIANE" ; 

N$(4) = "STEVE" ; N$(5)= "DAVID" . 

Line 110 gives A the value of 1 . The 
program uses A's value for another sub- 
script of N$ so we can compare two 
names in a test statement. 

Line 120 is the beginning of a FOR/ 
NEXT loop that will use P's value to sub- 
script AN $. 

Line 130 is the beginning of a FOR/ 
NEXT loop that will use L's value to sub- 
script N$. 

Line 140 is a test statement that com- 
pares two names in the array N$. If the 
statement is true, THEN A will equal L's 
value, or number. 

Line 150 returns to Line 130 for the 
next value of L until all five N$ names are 
checked and the lowest value is found. 

Line 1 60 — when the computer reaches 
this line it has found the lowest name, al- 
phabetically, and it is placed in the cur- 
rent subscript value of AN $. 

Line 170 — N$(A) is the name placed 
alphabetically in AN$(P). The name in 
N$(A) is no longer needed, so we cross it 
off the list by placing Z's in its place. 

Line 180 returns to Line 120 and the 
process begins again until P=5 and all 
the names are alphabetized. 

This will become much clearer by fol- 
lowing the program step-by-step as it 
finds the first name for our alphabetical 
list. After you have INPUT the names, this 
is what the computer does : 

Line 1 10 — A=1 

Line 120— P=1 

Lines 1 30 to 150 — repeat five times 
and the comparison looks like this: 140 if 

N$(L)< N$(A)THEN A=L. 

When L=1: Is Paula < Paula? NO, 



THENA=1 

When L=2 : Is Jeff < Paula? YES, THEN 
A=2 

When L=3: Is Diane < Jeff? YES, 
THEN A=3 

When L=4: Is Steve < Diane? NO, 
THEN A=3 

When L=5: Is David < Diane? YES, 
THEN A=5 

Since L= 5, the loop ends and the com- 
puter goes to the next line: LINE 160 
an$(p) = n$(a), which means: an$(1) = 
"david" because A = 5 and N$(5) holds 
the name David. 

Line 170 n$(a) = "zzzz", so: n$(5) 
="zzzz". This replaces the name David 
with Z's; it's like crossing david off the N$ 
list so it can't be used again. 

Line 180 sends the computer back to 
Line 120and P=2. 

The process begins again, but this time 
david will not be on the list, so the next 
name that follows alphabetically will be 
found and put in AN$(2), and so on until 
all the names are in AN$ and all z's ap- 
pear in N$. The computer will then go on 
to the PRINT statements in Lines 210 to 
260 and the alphabetical list will be 
printed. 

When you RUN the program the re- 
sults should look like this: 

THE NAMES IN ALPHABETICAL ORDER ARE : 

DAVID 

DIANE 

JEFF 

PAULA 

STEVE 

This program will work for any list of 
words or names, so be sure to CSAVE it. 
If you want to alphabetize more than five 
words, change Lines 20,60, 1 20, 1 30 and 
240 to the number of words in your list. 
You can also add telephone numbers 
and addresses to the list. If you have a 
printer, change Lines 220,230 and 250 
to: print #— 2,... 



Program Listing 1. Find the Largest Number 

10 REM — THE LARGEST OF TWO NUMBE 
RS 

20 CLS 
30 PRINT 

40 INPUT " ENTER A NUMBER — >"?A 
50 INPUT "ANOTHER NUMBER — >";B 
60 IF A=B THEN 110 
70 IF A>B THEN 90 ELSE PRINT B; 
"IS GREATER THAN"; A 
80 GOTO 30 

90 PRINT A; "IS GREATER THAN" ;B 

100 GOTO 30 

110 PRINT A; "=" ;B 

120 GOTO 30 ■■■ 
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anyone who brings a new four-leaf clover 
to Shamrock. 

The luck of the Irish is with you, and 
you have found a four-leaf clover! But 
reaching Shamrock with your find will 
not be easy. A nasty leprechaun wants 
the crown of Shamrock also, and he is 
guarding the only entrance to the King- 
dom — a bridge that can be crossed only 
after challenging the leprechaun. 

The leprechaun thinks of a number 
from 0 to 20 and allows you four chances 
to guess it. I know I said the leprechaun 
was nasty, but he's also fair, and he'll tell 
you if your guess is too high or too low. 

If you guess the correct number before 
your chances are up you are free to enter 
Shamrock and claim the crown, but if 
you fail you must pay the toll and the 
four-leaf clover goes to the leprechaun 
and he becomes the nasty new ruler of 
Shamrock!! 

The Variables: 

B$ = a stop in the program until you 
press <ENTER>. 

N = a random number from 0 to 20. 

G = your guess. 

A to F = horizontal and vertical posi- 
tions for the graphics. 

P$ = your answer to the prompt: play 

AGAIN (Y/N)? 

You can make the game harder by 
changing the random number value to a 
larger number or by changing the guesses 
to less than four. Have fun and good 
luck! 

Next month we're going to teach our 
computer to read. No, not novels, but to 
a computer, DATA statements are the 
next best thing. 

See you in April! ■ ■ ■ 

t Programs 

Program Listing 2. Using More Than Three 
Variables 

10 REM- -LARGEST # OF THREE 
20 CLS 
30 PRINT 

40 INPUT "ENTER A NUMBER — >";A 
50 INPUT "ANOTHER NUMBER — >";B 
60 INPUT "ANOTHER NUMBER— >";C 
70 IF A=>B AND A=>C THEN 110 
80 IF B=>A AND B=>C THEN 130 
90 PRINT C ; " IS THE LARGEST NUMBE 
R" 

100 GOTO 30 

110 PRINT A; "IS THE LARGEST NUMB 
ER" 

120 GOTO 30 

130 PRINT B ; " IS THE LARGEST NUMB 
ER" 

140 GOTO 30 ■■■ 



Random Numbers 

Random means out of order; your 
computer can select random numbers 
when you give it this statement: rnd(x). 
x is replaced by the highest number you 
want and the numbers the computer 
selects will be from 0 to X. 

To see how your computer does this, 
enter this program: 

10 REM-RANDOM NUMBERS 
20 FOR L=1 TO 100 
30 X=RND(100) 

40 ? X; 

50 NEXT L 

Each time the computer repeats the L 
loop it selects a random number from 0 
to 100. The number will be printed for 
you to see. After you RUN the program a 
few times try other numbers in place of 
100 . 

A Game of Random Numbers 

I've written a game for you that was in- 
spired by St. Patricks's Day. The program 
is a little long, so you may want to ask for 
help typing it. We've covered all the 
statements in this and past lessons so I'm 
sure with careful reading you'll be able to 
follow the logic. 

"Shamrock's Crown" has simple 
graphics and sound, and hints to help 
you as you play. After you become famil- 
iar with the game, use it as a guide for 
writing your own game. 

The plot: The Kingdom of Shamrock 
has lost its lucky four-leaf clover. Bad luck 
is destroying the peaceful Kingdom and 
the subjects are offering the throne to 
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BASIC COMPUTER GAMES, Microcomputer 
Edition, edited by David H. Ahl. Here’s a great 
collection of 101 fascinating games, all written 
in easy-to-use Microsoft BASIC. Play Craps, 
Combat, Super Star Trek, Lunar LEM Rocket, 
Gomoko, Checkers, Boxing, Bowling- and 93 
others! With an introduction, notes on Microsoft 
BASIC, and conversion instructions for other 
BASICs. 8H" x 11", softcover, illustrated, with 
an index. $7.95 ($1.50). #6C 

MORE BASIC COMPUTER GAMES, edited by 
David H. Ahl and Steve North. In this sequel to 
Basic Computer Games you’ll find 84 challeng- 
ing new games, complete with sample runs, 
program listings and illustrations. All run in Mi- 
crosoft BASIC. Race your Ferrari, become a 
millionaire, joust with a knight, crack a safe, and 
more! Conversion table to other BASICs in- 
cluded. 814" x 11", softcover, illustrated, $7.95 
($1.50). #6C2 



TRS-80® Microcomputer Edition, $7.95 ($1.50). 

#6C4 




EDUCATIONAL BOOKS 



BE A COMPUTER LITERATE, by Marion Ball and 

Sylvia Charp, is an introduction to computing 
for children ages 10 to 16. Perfect for school or 
home use, this easy-to-read volume shows how 
to use computers and introduces program- 
ming concepts. Illustrated in full color with dia- 
grams and photos on every page. 8Y2" x 11", 
softcover, with glossary of terms. $6.95 ($1.50). 
#6H 



TRS-80 is a registered trademark of the Radio Shack Divi 
sion of Tandy Corp. 
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CREATIVE COMPUTING PRESS Dept. NM1C 
39 East Hanover Avenue, Morris Plains, NJ 07950 

Send me the bodes listed below: 




□ PAYMENT ENCLOSED $ 

□ CHARGE MY: 

□ American Express □ MasterCard □ Visa 
(Charge and phone orders: $10 minimum.) 



Card No- 



_Exp. Date_ 



Mr./Mrs./Ms._ 
Address 



(please print full name) 



-Apt- 



City- 



State— 



_Zip_ 



For faster service. CALL TOLL FREE: 800-631-8112. 
On NJ call 201-540-0445) 
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TRS - 80 

COMPUTER 

DISCOUNTS 




COLOR COMPUTERS 



26-3026 16k color II 139.95 

26-3027 16k ext color II 169.95 

26-3127 64k color comp II 210.00 

26-3022 1st disk drive 329.95 

26-3023 2nd disk drive 229.95 




PRINTERS 



26-1271 DMP-110 299.95 

26-1254 DMP-200 510.00 

26-1255 DMP-120 395.00 

26-1257 DWP-210 629.95 




MODEL 4 and 100’s 



26-1067 mod 4 16k 829.95 

26-1069 mod 4 64K 2 dr. 1695.00 

26-3801 mod 100 8 k 699.95 

26-3802 mod 100 24k 839.95 



WE CARRY THE COMPLETE LINE OF 
TRS-80 COMPUTER PRODUCTS 
AT DISCOUNT PRICES 

CALL FOR 
FREE PRICE LIST 

800-257-5556 

in N.J. 609-769-0551 

Woodstown Electronics 

Route 40 E. Woodstown, N.J. 08098 



Program Listing 3. 

An Alphabetizing Program 

10 REM— ALPHABETIZING PROGRAM 
20 DIM N$(5) ,AN$(5) 

30 CLS : PRINT 

50 REM — TO INPUT NAMES: 

60 FOR L=1 TO 5 

70 INPUT "A NAME— >" ;N$(L) 

80 NEXT L 

100 REM — TO TEST & COMPARE: 

110 A=1 

120 FOR P=1 TO 5 

130 FOR L=1 TO 5 

140 IF N$(L) < N$ ( A ) THEN A=L 

150 NEXT L 

160 AN$ ( P ) =N$ ( A ) 

170 N$(A)="ZZZZ" 

180 NEXT P 

200 REM — PRINTS ALPHABETICAL LIS 
T 

210 CLS : PRINT 

220 PRINT "THE NAMES IN ALPHABET 
ICAL ORDER ARE:" 

230 PRINT : PRINT 
240 FOR L=1 TO 5 
250 PRINT " " ; AN$ ( L ) 

260 NEXT L 

270 END ■■■ 



Program Listing 4. Shamrock's Crown 

10 REM — SHAMROCK'S CROWN 
20 CLS : PRINT 

30 PRINT " YOU HAVE 4 CHANCES T 
O GUESS" 

40 PRINT "THE LEPRECHAUN'S SECRE 
T NUMBER." 

50 PRINT " <A NUMBER FROM 0 T 
0 20 >" 

60 PRINT "IF YOU ARE CORRECT, TH 
E LEPRE-" 

70 PRINT "CHAUN WILL ALLOW YOU T 
O ENTER" 

80 PRINT "SHAMROCK WITH THE FOUR 
-LEAF" 

90 PRINT "CLOVER THAT WILL WIN Y 
OU THE" 

100 PRINT "CROWN OF SHAMROCK. B 
UT, IF YOU" 

110 PRINT "FAIL, THE LEPRECHAUN 
WINS YOUR" 

120 PRINT "CLOVER AND BECOMES TH 
E NEW" 

130 PRINT "RULER OF SHAMROCK." 
140 PRINT : PRINT "WHEN YOU ARE RE 
ADY TO BEGIN" 
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150 INPUT "YOUR CHALLENGE PRESS 
<ENTER>" ;B$ 

160 CLS {PRINT : N=RND ( 20 ) 

170 FOR L=1 TO 4 

180 PRINT "GUESS #";L?: INPUT 

->" ;G 

190 IF G=N GOTO 320 

200 IF G>N THEN SOUND 200,5:PRIN 

T "TOO HIGH" 

210 IF G<N THEN SOUND 100,5:PRIN 
T"TOO LOW" 

220 NEXT L 

230 REM — LEPRECHAUN WINS 
240 CLS 

250 PRINT@105 , "THE LEPRECHAUN" 
260 PRINT@16 5 , " HAS WON YOUR CLOV 
ER! ! " 

270 FOR S=100 TO 10 STEP -5 
280 SOUND S , 3 : NEXT S 
290 PRINT:PRINT 

300 PRINT " THE CORRECT NUMBER W 

AS — >" ;N 

310 GOTO 530 

320 REM--YOU WON!! 

330 CLS(0) :A=13:B=15:C=29:D=31:E 
=45 : F=47 

340 FOR V=5 TO 11 
350 FOR X=A TO B : SET ( X , V, 2 ) : NEXT 
X 

360 FOR Y=C TO D : SET ( Y , V, 2 ) : NEXT 
Y 

370 FOR Z=E TO F : SET ( Z , V, 2 ) : NEXT 
Z 

380 A=A-1 : B=B+1 : C=C-1 : D=D+1 j E=E- 

1 : f=f+i 

390 NEXT V 

400 A=6 : B=54 

410 FOR V=12 TO 15 

420 FOR H=A TO B:SET(H,V,2) 

430 NEXT H 

440 A=A-1 : B=B+1 

450 NEXT V 

460 FOR V=16 TO 21 

470 FOR H=3 TO 57 

480 SET ( H , V, 8 ) 

490 NEXT H,V 

500 SET( 8,18,1) s SET( 30,18,1) sSET 
(52,18,1) 

510 SET (14, 4,1) :SET(30,4,1) :SET( 
46,4,1) 

520 PRINT@416," SHAMROCK'S CRO 
WN IS YOURS! ! " 

530 PRINT® 480 , "PLAY AGAIN (Y/N)" 
; : INPUT P$ 

540 IF P$="Y" GOTO 160 

550 IF P$="N" THEN END ELSE GOTO 



Go for the 

MAX 



a 



FF 

TM 



Panamax 
Surge Suppressors 
provide the fastest 
response time and 
highest energy 
dissipation available 
to assure you the 
maximum protection 
against over voltage 
"Spikes and glitches". 
Priced from $59.00 



PAIMAMAX 

Toll Free 1-800-472-5555 

In California call 415-472-5547 

150 Mitchell Boulevard, San Rafael, CA 94903 
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NEW for the Color Computer TRS-80* 
■COCOCASSETTE' SUBSCRIPTION SOFTWARE 



♦ms 80 IS A TRADEMARK OF TANDY COMPANY 




ENJOY A MONTHLY COLLECTION OF 6-1 0 PROGRAMS! 

Including gomes, education, home finance and more; 
on cassette for os low os $5.00 a month! Add some 
action and imoginorion to your Color Computer. .. Best of 
oil, we do the work! 

PRICES 

1 YR (12 ISSUES) $55.00 

6 MO (6 ISSUES) $30.00 

SINGLE COPIES $ 6.00 

— MICHIGAN RESIDENTS ADD 4% TO ORDER 

— OVERSEAS ADD $10.00 TO SUBSCRIPTION AND $1.00 
TO SINGLE COPIES 

616 396-7577 



PROGRAMS ARE FOR 
EXTENDED BASIC MODEL ONLY 
ISSUES ARE SENT FIRST CLASS 




SUBSCRIPTION SOFTWARE 



VISA 



SEND CHECK OR MONEY ORDER TO: 

T 6 D SOFTWARE 
P.O. BOX 256-C • HOLLAND, MICH. 49423 

************ 
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Morse Code 
Generator 

Dits and Dahs on your TV 



mSmAMBtSmAk 



by Stephen Ritger 



T HIS PROGRAM CONVERTS a mes- 
sage entered at the keyboard to 
its Morse Code equivalent, pro- 
ducing "dits" and "dahs" via your TV. 
You can change the tone by changing 
the value of the sound command in Line 
150. 

Using the fact that each letter and 
number has an ASCII value assigned to it 
I set up an array, called MC$. This con- 
tains the sound information for each 
character, indexed under its ASCII value. 
The array AS contains the ASCII informa- 
tion for each respective character. 

I have included data for all the basic 
codes in the International Morse Code. If 
you wish to add your own special charac- 
ters, simply add on to the data state- 
ments in Lines 280 - 290. Make sure the 
code for your character doesn't duplicate 
one of the codes already in the data state- 
ments. The tones are encoded by num- 
bers, with the number 1 equal to a " d it " 
(dot), and the number 3 equal to a "dah" 
(dash). For example, the letter A, whose 
ASCII number is 65, has the code 13, 
which stands for "dit-dah." The letter Z, 
whose ASCII number is 90, has the code 
3311, which stands for "dah-dah-dit- 
dit." ■ ■ ■ 



Program Listing. Morse Code 

10 ’ MORSE CODE GENERATOR 

20 ’ BY STEVE RITGER 

40 CLS : CLEAR 255: GOSUB 210 

50 M$= n MORSE CODE GENERATO 

R BY STEVE RITGER" 

: GOTO 80 

60 CLS: LINEINPUT "ENTER MESSAGE 
- ";M$ 

70 IF M$= "" THEN 60 
80 CLS 

90 FOR L = 1 TO LEN ( M$ ) 

100 PRINT MID$(M$,L,1) ; 

110 A= ASC(MID$(M$ f L,l) ) 

120 FOR SND= 1 TO LEN ( MC$ ( A ) ) 

130 V= VAL ( MID$ ( MC$ ( A ) , SND , 1 ) ) 

140 IF V= 0 THEN 170 

150 SOUND 176 ,V 

160 FOR DL= 1 TO 20: NEXT DL 

170 NEXT SND 

180 FOR DL= 1 TO 50: NEXT DL : NE 
XT L 

190 FOR DL= 1 TO 2000: NEXT DL 
200 GOTO 60 

210 ' DEFINE MORSE CODE 
220 DIM MC$ ( 127 ) 

230 FOR Q= 1 TO 36 
240 READ Zl: READ MC$(Z1) 

250 NEXT Q 
260 RETURN 

270 ' MORSE CODE DATA 
280 DATA 48,33333,49,13333,50,11 
333,51,11133,52,11113,53,11111,5 
4,31111,55,33111,56,33311,57,333 
31,65,13,66,3111,67,3131,68,311, 

69.1.70.1131.71.331.72.1111.73.1 
1,74,1333,75,313,76,1311,77,33,7 

8.31.79.333.80.1331.81.3313.82.1 
31,83,111,84,3,85,113,86,1113 
290 DATA 87,133,88,3113,89,3133, 
90,3311 ■■■ 
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Dissecting Your ROM 

Part seven of a fourteen-part series. 



A T LAST WE'VE REACHED an im- 
portant part of the journey 
through the ROM — the end of 
part one. Address $BFFF represents an 
unexpected halfway point in the series. 
Color Basic (the un-Extended version) is 
complete up to this point. I'd like to ex- 
tend my gratitude to Terry Kepner for in- 
valuable assistance in transcribing this 
hefty tome. 

For the majority of you with Extended 
Color Basic, the disassembly resumes not 
at address $C000 (immediately follow- 
ing $BFFF) as you might expect, but 
lower down in memory at location 
$8000. The ROM area from $C000 and 
up is reserved for the cartridge slot, and 
may contain Disk Basic, EDTASM+ or 
whatever ROM you happen to have 
plugged in there. 

The floating point math routines take 
up most of this month's portion of ROM. 
Floating point routines are guaranteed to 
give you a headache, not so much be- 
cause they're complicated but because 



by Jake Commander 



they're tedious. One of the luxuries of 
programming mainframe computers is 
that you can perform floating point arith- 
metic through the computer's execution 
of a single instruction. Just say fpad to the 
assembler on many big machines and 
that's the end of any floating point addi- 
tion problem. 

On a micro, however, things are more 
longwinded. Without such powerful op- 
codes, it becomes necessary to manipu- 
late floating point numbers byte by byte, 
taking separate account of the exponent 
byte and the mantissa portion. It's this 
juggling of bits and bytes at the mantissa 
level which takes up much of the body of 
this code. 

Without getting into a treatise on the 
binary floating point system, here are the 



rudiments. The mantissa represents the 
number itself (i.e., the digits that com- 
prise the number), and the exponent rep- 
resents the number of digits to move the 
decimal point for correct location. As 
we're talking in binary, the number in the 
mantissa is binary (not decimal) and the 
exponent is therefore really the location 
of the binary point. To ensure maximum 
precision, no leading zeroes are stored in 
the mantissa and the binary point is al- 
ways assumed to be at the left hand side 
of it. Consequently, the exponent will 
contain a positive or negative number 
representing the number of bits to count 
to locate the binary point. 

In the Color Computer, there are four 
bytes in the mantissa and one in the ex- 
ponent. This format is what gives us the 
nine decimal digits of precision in all 
numerical calculations. This medium pre- 
cision makes life a lot easier in the ROM, 
as no routines are required to distinguish 
between single and double precision 
arithmetic. ■ ■ ■ 



+ Program 







a piotessxo 

jamming 0 ’ 



niBiACtab 

aRMatt»« n ® 





P'»9 ,amme '" 5. . chuc M«" n 

...--•"••rr.. * 



Please send me the Databar option(s) ini 

□ Option 1 ($79.95)t*tt □ Option 3 ($35.00 Q1) 

□ Option 2 ($120.00) □ Option 4 ($240.00) t 

□ Option 5 ($10.50) 

*30-day money-back guarantee. +Add 
$1.50 for handling. ttMN residents 
add 6% sales tax. 

Enclosed Check # 

Money Order # 



Card # . 



Exp. Date . 
Name 



Payable to Databar. 

Or charge my Am Ex □ Visa □ 
MasterCard □ 

Carte Blanche □ m 
D iners ClubD 



Address . 
City 



. State . 



.Zip 



Phone . 



My Computer Model is . 






If you want to get more benefit 
out of your home computer and still 
avoid the purchase of expensive 
peripherals. ..if complex keyboard pro 
gramming leaves you cold and you’re 
tired of paying exhorbitant prices for 
every new cassette or diskette pro- 
gram-then you’re ready for OSCAR 
and the DATABAR Club! 

OSCAR is simply the finest hand- 
held optical barcode reader ever devel 
oped for the home computer marketplace. 

It works with virtually every home com- 
puter. And together with a simple plastic 
template, it allows you to enter all kinds of 
programs into your home computer 
in just a few minutes. 

But hardware without programs 
is useless — and that’s where the 
DATABAR Club 



comes in. This includes a magazine that 
is delivered straight to your home every 
month with 8 programs on subjects 
ranging from fun and games, to edu- 
cation, to home finances. There are 
actually eight different categories in 
all: Funware, Homeware, Healthware, 
Wordware, Classware, Scienceware, 
Legalware, and Genware. Instead of 
paying $15 or $30 or more for cas- 
sette or diskette programs, or paying 
the $9.95 retail price for DATABAR 
programs— you can receive them 
for as little as $1.25 each by 
joining the DATABAR Club. 
So if you already have a home 
computer, or if you’re thinking about buying 
one— take advantage of OSCAR’S 5-way offer now. 
Get your full money’s worth on your computer invest- 
ment. Send in the coupon, or call for further information. 



OSCAR’S 5-WAY SPECIAL OFFER! 



Databar Corporation, 10202 Crosstown Circle • Eden Prairie, MN 55344 • Phone Orders: MN (612) 944-5700 
Out-of-State: 1 (800) 672-2776 



S Enter 53 on TeleResponse page 159 




Line 



Object 



Program Listing. ROM Dissection 



Number 


Address 


Code 


Mnemonic 


Operand 


Jake's Comment 


















FPAC1 


+ 0.5 
















03288 


BA29 


96 


53 


LDA 


<$53 


03230 


B9B4 


8E 


BEC0 


LDX 


# $BEC0 


;Floating point # 0.5 






03289 


BA2B 


97 


52 


STA 


<$52 


03231 


B9B7 


20 


09 


BRA 


$B9C2 


; Add 0.5 to FPAC1 






03290 


BA2D 


96 


63 


LDA 


<$63 


03232 


B9B9 


BD 


BB2F 


JSR 


$BB2F 


? ( X) (variable format) 


to 


FPAC 2 


03291 


BA2F 


97 


53 


STA 


<$53 


03233 


B9BC 


03 


54 


COM 


<$54 


Change sign of FPAC1 






03292 


BA31 


OF 


63 


CLR 


<$63 


03234 


B9BE 


03 


62 


COM 


<$62 


Change sign of result 






03293 


BA33 


CB 


08 


ADDB 


#8 


03235 


B9C0 


20 


03 


BRA 


$B9C5 








03294 


BA35 


Cl 


28 


CMPB 


#$28 


03236 


B9C2 


BD 


BB2F 


JSR 


$BB2F 


; VARPTR (x) to FPAC 2 






03295 


BA37 


2D 


E4 


BLT 


$BA1D 


03237 


B9C5 


5D 




TSTB 




;Exponent FPAC1 






03296 


BA39 


4F 




CLRA 




03238 


B9C6 


1027 0280 


LBEQ 


$BC4A 


; If FPAC1=0, cpy FPAC 2 


to 


FPAC1 


03297 


BA3A 


97 


4F 


STA 


<$4F 


03239 


B9CA 


8E 


005C 


LDX 


#$005C 


;=> FPAC 2 






03298 


BA3C 


97 


54 


STA 


<$54 


03240 


B9CD 


IF 


89 


TFR 


A,B 


; FPAC2 exponent to B 






03299 


BA3E 


39 




RTS 




03241 


B9CF 


5D 




TSTB 




; Zero? 


















03242 


B9D0 


27 


6C 


BEQ 


$BA3E 


; If FPAC2=0 , FPAC1 alrdy corrct 


Get Non-zero most significant bit 


03243 


B9D2 


DO 


4F 


SUBB 


<$4F 


; FPAC2 exponnt - FPAC1 


exponnt 


03300 


BA3F 


8D 


6D 


BSR 


$BAAE 


03244 


B9D4 


27 


69 


BEQ 


$BA3F 


? If mantisas aligned 






03301 


BA41 


5F 




CLRB 




03245 


B9D6 


2B 


0A 


BMI 


$B9E2 


I If FPAC1 > FPAC2 






03302 


BA42 


20 


A8 


BRA 


$B9EC 


03246 


B9D8 


97 


4F 


STA 


<$4F 


; FPAC2 exponent to FPAC1 




03303 


BA44 


5C 




INCB 




03247 


B9DA 


96 


61 


LDA 


<$61 


;Transfer Least Signif 


ant 


Byte 


03304 


BA45 


08 


63 


ASL 


<$63 


03248 


B9DC 


97 


54 


STA 


<$54 








03305 


BA47 


09 


53 


ROL 


<$53 


03249 


B9DE 


8E 


004F 


LDX 


#$004F 


?=> FPAC1 






03306 


BA49 


09 


52 


ROL 


<$52 


03250 


B9E1 


50 




NEGB 




;Minus # bits to align 






03307 


BA4B 


09 


51 


ROL 


<$51 


03251 


B9E2 


Cl 


F8 


CMPB 


#$F8 


; < 8 bits? 






03308 


BA4D 


09 


50 


ROL 


<$50 


03252 


B9E4 


2F 


59 


BLE 


$BA3F 


;No, do bytewise 






03309 


BA4F 


2A 


F3 


BPL 


$BA44 


03253 


B9E6 


4F 




CLRA 




Carry flag off 






03310 


BA51 


96 


4F 


LDA 


<$4F 


03254 


B9E7 


64 


01 


LSR 


1 z X 


;Shift right MSB 






03311 


BA53 


34 


04 


PSHS 


B 


03255 


B9E9 


BD 


BABA 


JSR 


$BABA 


;Shift right -B bits FPAC1 




03312 


BA55 


A0 


E0 


SUBA 


, S+ 


03256 


B9EC 


D6 


62 


LDB 


<$62 


;Sign of result 






03313 


BA57 


97 


4F 


STA 


<$4F 


03257 


B9EE 


2A 


0B 


BPL 


$B9FB 


;If positive 






03314 


BA59 


23 


DE 


BLS 


$BA39 


03258 


B9F0 


63 


01 


COM 


1,X 


;Else complement FPAC1 






03315 


BA5B 


8C 


2508 


CMPX 


#$2508 


03259 


B9F2 


63 


02 


COM 


2,X 










BA5C 


25 


08 


BLO 


$BA66 


03260 


B9F4 


63 


03 


COM 


3 , X 








03316 


BA5E 


08 


63 


ASL 


<$63 


03261 


B9F6 


63 


04 


COM 


4 / X 








03317 


BA60 


86 


00 


LDA 


#0 


03262 


B9F8 


43 




COMA 










03318 


BA62 


97 


63 


STA 


<$63 


03263 


B9F9 


89 


00 


ADCA 


#0 








03319 


BA64 


20 


OC 


BRA 


$BA72 


03264 


B9FB 


97 


63 


STA 


<$63 


; Round-off byte 






03320 


BA66 


OC 


4F 


INC 


<$4F 


03265 


B9FD 


96 


53 


LDA 


<$53 


; *Add 






03321 


BA68 


27 


28 


BEQ 


$BA92 


03266 


B9FF 


99 


60 


ADCA 


<$60 


. * 
9 






03322 


BA6A 


06 


50 


ROR 


<$50 


03267 


BA01 


97 


53 


STA 


<$53 


; *FPAC1 






03323 


BA6C 


06 


51 


ROR 


<$51 


03268 


BA03 


96 


52 


LDA 


<$52 


. * 
i 






03324 


BA6E 


06 


52 


ROR 


<$52 


03269 


BA05 


99 


5F 


ADCA 


<$5F 


; *to 






03325 


BA70 


06 


53 


ROR 


<$53 


03270 


BA07 


97 


52 


STA 


<$52 


• 

9 






03326 


BA72 


24 


04 


BHS 


$BA78 


03271 


BA09 


96 


51 


LDA 


<$51 


; *ACC2 






03327 


BA74 


8D 


0D 


BSR 


$BA83 


03272 


BA0B 


99 


5E 


ADCA 


<$5E 


• ♦ 






03328 


BA76 


27 


EE 


BEQ 


$BA66 


03273 


BA0D 


97 


51 


STA 


<$51 


;*in 






03329 


BA78 


39 




RTS 




03274 


BA0F 


96 


50 


LDA 


<$50 


. * 
9 


















03275 


BAll 


99 


5D 


ADCA 


<$5D 


?*FPAC1 






Negate 


FPAC1 








03276 


BA13 


97 


50 


STA 


<$50 


. * 
9 






03330 


BA79 


03 


54 


COM 


<$54 


03277 


BA15 


5D 




TSTB 




;Sign of result? 






03331 


BA7B 


03 


50 


COM 


<$50 


03278 


BA16 


2A 


44 


BPL 


$BA5C 


?If positive 






03332 


BA7D 


03 


51 


COM 


<$51 


Floating point 


normalize 












03333 


BA7F 


03 


52 


COM 


<$52 


03279 


BA18 


25 


02 


BLO 


$BA1C 


;If MSB is positive 






03334 


BA81 


03 


53 


COM 


<$53 


03280 


BA1A 


8D 


5D 


BSR 


$BA79 


; Negate FPAC1 






03335 


BA83 


9E 


52 


LDX 


<$52 


03281 


BAlC 


5F 




CLRB 




initialize exponent 






03336 


BA85 


30 


01 


LEAX 


1,X 


03282 


BA1D 


96 


50 


LDA 


<$50 


;Most significant byte 






03337 


BA87 


9F 


52 


STX 


<$52 


03283 


BA1F 


26 


2E 


BNE 


$BA4F 


; If MSB is non-zero 






03338 


BA89 


26 


06 


BNE 


$BA91 


03284 


BA21 


96 


51 


LDA 


<$51 


;MSB 






03339 


BA8B 


9E 


50 


LDX 


<$50 


03285 


BA23 


97 


50 


STA 


<$50 


; Shift 






03340 


BA8D 


30 


01 


LEAX 


1/X 


03286 


BA25 


96 


52 


LDA 


<$52 


? FPAC1 






03341 


BA8F 


9F 


50 


STX 


<$50 


03287 


BA27 


97 


51 


STA 


<$51 


? left 






03342 


BA91 


39 




RTS 





8 

bits 

Move last truncated byte... 

. . . into LSB 

Zero least significant byte 
Bump number shifts plus eight 
All possible bits shifted? 
Shift again if not 
Return FPAC1=0 
Zero exponent 
Set sign positive 



; Align FPAC 
;Carry flag off 
; Add/subtract FPAC1/2 
?Bump number of shifts 
;Carry-out byte 
; *Shif t FPAC1 
; *lef t 
; *one 
; *bit 

;Shft again if MSB bit7 not set 
;Unnormalized exponent 
; A - B Normalize exponent 

; Normalized exponent to FPAC1 
;Return zero if underflow 



;Set carry if round-up required 
;Zero least significant byte 
; Don't change carry flag 

;Bump exponent 

;?0V Error if over the top 

; *Shif t 

; *FPAC1 

;*right 

;*one bit 

;RTS if no rounding required 
;Bump mantissa to round up 
;Next bit 



Complement sign bit 
; ^Mantissa 
? *all 

? *complemented 

. * 

; LSW FPAC1 + 1 



;RTS if no carry 
;Else MSW FPAC1 + 1 



* more 



98/March 1984 



Object 



Number 


Address Code 


Mnemonic 


Operand 


Jake's Comment 


?OV Error 












03343 


BA92 


C6 


0A 


LDB 


#$0A 


; Error code 


03344 


BA94 


7E 


AC46 


JMP 


$AC4 6 


;Error processing 


Align 


FPAC 












03345 


BA97 


8E 


0012 


LDX 


#$0012 


;=> FPAC 3 


03346 


BA9A 


A6 


04 


LDA 


4,X 


;Carry-out byte 


03347 


BA9C 


97 


63 


STA 


<$63 




03348 


BA9E 


A6 


03 


LDA 


3,X 


;Next LSB to LSB 


03349 


BAA0 


A7 


04 


STA 


4,X 




03350 


BAA2 


A6 


02 


LDA 


2 , X 


;Next MSB to next MSB 


03351 


BAA4 


A7 


03 


STA 


3 /X 




03352 


BAA6 


A6 


01 


LDA 


l,x 


;MSB to next MSB 


03353 


BAA8 


A7 


02 


STA 


2 , X 




03354 


BAAA 


96 


5B 


LDA 


<$5B 


;Carry-in Byte 


03355 


BAAC 


A7 


01 


STA 


1,X 


;To MSB 


03356 


BAAE 


CB 


08 


ADDB 


#8 


;Set B postv if <8 bits to shft 


03357 


BAB0 


2F 


E8 


BLE 


$BA9A 


;Another 8 bits if no undeflow 


03358 


BAB 2 


96 


63 


LDA 


<$63 


;Carry-out shifted also 


03359 


BAB 4 


CO 


08 


SUBB 


#8 


;Readjust for previous undrflow 


03360 


BAB6 


27 


OC 


BEQ 


$BAC4 


; RTS if alignment is complete 


03361 


BAB8 


67 


01 


ASR 


i,x 


;MSB 


03362 


BABA 


66 


02 


ROR 


2 f X 


;Next MSB 


03363 


BABC 


66 


03 


ROR 


3 , X 


;Next LSB 


03364 


BABE 


66 


04 


ROR 


4 , X 


;LSB 


03365 


BAC0 


46 




RORA 




;Carry-out byte 


03366 


BAC1 


5C 




INCB 




;One less bit to do 


03367 


BAC2 


26 


F4 


BNE 


$BAB8 


;If more bits 


03368 


BAC4 


39 




RTS 






Floating point 


constant 


= 1.0 






03369 


BAC5 


81 


00 


CMPA 


#0 




03370 


BAC7 


00 


00 


NEG 


<0 




Floating point 


multiply 








03371 


BAC9 


00 


8D 


NEG 


<$8D 


; Incorrect disassembly 




BACA 


8D 


63 


BSR 


$63 


; Varptr (X) to FPAC2 


Entry 


Point 


for FPAC2 * 


FPAC1 






03372 


BACC 


27 


60 


BEQ 


$60 


;RTS if FPAC1 equals zero, RTS 


03373 


BACE 


8D 


78 


BSR 


$78 


;Add exponents 


03374 


BAD0 


86 


00 


LDA 


$0 




03375 


BAD 2 


97 


13 


STA 


<$13 


;*Zero 


03376 


BAD 4 


97 


14 


STA 


<$14 


; *mantissa 


03377 


BAD6 


97 


15 


STA 


<$15 


;*of 


03378 


BAD8 


97 


16 


STA 


<$16 


; *FPAC3 


03379 


BADA 


D6 


53 


LDB 


<$53 


; LSB FPAC1 


03380 


BADC 


8D 


22 


BSR 


$BB00 


;Form multiply in FPAC 3 


03381 


BADE 


D6 


63 


LDB 


<$63 


;Save truncated byte 


03382 


BAE0 


D7 


AE 


STB 


<$AE 




03383 


BAE2 


D6 


52 


LDB 


<$52 


;Next LSB of FPAC1 


03384 


BAE4 


8D 


1A 


BSR 


$BB00 


;Form multiply in FPAC 3 


03385 


BAE6 


D6 


63 


LDB 


<$63 


;Save truncated byte 


03386 


BAE8 


D7 


AD 


STB 


<$AD 




03387 


BAEA 


D6 


51 


LDB 


<$51 


;Next MSB of FPAC1 


03388 


BAEC 


8D 


12 


BSR 


$BB00 


;Form multiply in FPAC3 


03389 


BAEE 


D6 


63 


LDB 


<$63 


;Save truncated byte 


03390 


BAF0 


D7 


AC 


STB 


<$AC 




03391 


BAF2 


D6 


50 


LDB 


<$50 


; MSB of FPAC1 


03392 


BAF4 


8D 


OC 


BSR 


$BB02 


; (can't =0)Form mltply in FPAC 3 


03393 


BAF6 


D6 


63 


LDB 


<$63 


;Save truncated byte 



Line 



Object 



Number 


Address 


Code 




Mnemonic 


Operand 


Jake's Comment 


03394 


BAF8 


D7 


AB 




STB 


<$AB 




03395 


BAFA 


BD 


BC0B 




JSR 


$BC0B 


Move FPAC 3 mantissa to FPAC1 


03396 


BAFD 


7E 


BAlC 




JMP 


$BA1C 


Normalize 


03397 


BB00 


27 


95 




BEQ 


$BA97 


If zero byte shft right 8 bits 


03398 


BB02 


43 






COMA 




Carry flag off 


03399 


BB03 


96 


13 




LDA 


<$13 


MSB FPAC 3 


03400 


BB05 


56 






RORB 




Least Sign Bit to carry flag 


03401 


BB06 


27 


26 




BEQ 


$BB2E 


RTS if done all bits 


03402 


BB08 


24 


16 




BHS 


$BB2 0 


LSB = 0 don't add 


03403 


BB0A 


96 


16 




LDA 


<$16 


♦Add 


03404 


BB0C 


9B 


60 




ADDA 


<$60 


♦FPAC2 


03405 


BB0E 


97 


16 




STA 


<$16 


♦mantissa 


03406 


BB10 


96 


15 




LDA 


<$15 


♦to 


03407 


BB12 


99 


5F 




ADCA 


<$5F 


♦FPAC3 


03408 


BB14 


97 


15 




STA 


<$15 


♦mantissa 


03409 


BB16 


96 


14 




LDA 


<$14 


* 


03410 


BB18 


99 


5E 




ADCA 


<$5E 


★ 


03411 


BB1A 


97 


14 




STA 


<$14 


* 


03412 


BBlC 


96 


13 




LDA 


<$13 


* 


03413 


BB1E 


99 


5D 




ADCA 


<$5D 


* 


03414 


BB20 


46 






RORA 




Shift 


03415 


BB21 


97 


13 




STA 


<$13 


FPAC 3 


03416 


BB23 


06 


14 




ROR 


<$14 


right 


03417 


BB25 


06 


15 




ROR 


<$15 


one 


03418 


BB27 


06 


16 




ROR 


<$16 


bit 


03419 


BB29 


06 


63 




ROR 


<$63 


Save truncated bit 


03420 


BB2B 


4F 






CLRA 




Carry flag off 


03421 


BB2C 


20 


D5 




BRA 


$BB03 


Continue 


03422 


BB2E 


39 






RTS 






Variable format F.P 


. number at (X) to FPAC2 




03423 


BB2F 


EC 


01 




LDD 


1,X j 


rMost Significant Word 


03424 


BB31 


97 


61 




STA 


<$61 ; 


;Save MSB for sign 


03425 


BB33 


8A 


80 




ORA 


#$80 ; 


;Set most signif bit anyway 


03426 


BB35 


DD 


5D 




STD 


<$5D j 


;To most significant word FPAC 2 


Set sign FPAC2 


* FPAC1 








03427 


BB37 


D6 


61 




LDB 


<$61 j 


rSign in bit seven of FPAC1 


03428 


BB39 


D8 


54 




EORB 


<$54 j 


rSet minus if signs differ 


03429 


BB3B 


D7 


62 




STB 


<$62 j 


;Save sign of result 


03430 


BB3D 


EC 


03 




LDD 


3 ,X j 


:Least significant word 


03431 


BB3F 


DD 


5F 




STD 


<$5F j 


:To FPAC 2 


03432 


BB41 


A6 


84 




LDA 


,X ; 


Move exponent 


03433 


BB43 


97 


5C 




STA 


<$5C ; 


: to FPAC2 


03434 


BB45 


D6 


4F 




LDB 


<$4F ; 


:Get FPAC1 exponent 


03435 


BB47 


39 






RTS 






Add exponent #1 to exponent #2 






03436 


BB48 


4D 






TSTA 




Exponent FPAC2 


03437 


BB49 


27 


16 




BEQ 


$BB61 ! 


If zero, set FPAC1 = 0 


03438 


BB4B 


9B 


4F 




ADDA 


<$4F ; 


i Exp #1 plus Exp #2 


03439 


BB4D 


46 






RORA 


/ 


Carry flag to bit seven 


03440 


BB4E 


49 






ROLA 


J 


Check for overflow 


03441 


BB4F 


28 


10 




BVC 


$BB61 ; 


Possible overflow 


03442 


BB51 


8B 


80 




ADDA 


#$80 ; 


Restore bias 


03443 


BB53 


97 


4F 




STA 


<$4F ; 


Into FPACl 


03444 


BB55 


27 


OC 




BEQ 


$BB63 ; 


If zero, set FPACl = 0 


03445 


BB57 


96 


62 




LDA 


<$62 ; 


Sign of result 


03446 


BB59 


97 


54 




STA 


<$54 


Becomes sign for FPACl ♦ more 



03447 BB5B 39 



RTS 





Unleash the 
power of your 
computer! 

You’ve heard that line before, right? And you know that it 
really means “buy my program, and good luck to you.” 

Well, this ad is for people who don’t mind a little hard work. I’m talking 
to those of you who believe that owning a computer means a lot more 
than buying somebody’s expensive software or blindly typing in 
magazine programs — with the fervent hope that either one will work 
as promised. 

Am I talking to you? If so, then “Learning the 6809” should interest you. For $99 plus shipping, I’ll send you my complete 
course in how to program the 6809 processor, the powerful heart of your Color Computer. It’s just about the same course 
I teach in our state college system, and a better bargain because I’m always there on tape if you need to consult me. 

Now listen. If you weren’t bom to program, then “Learning the 6809” won’t do you any good. But if you’ve got the inclination 
to program and a willingness to work, then the Micro Language Lab is what you’re looking for. 

My 1,500-question programmed learning system is enough to teach you everything the pros know, but that’s just a small 
part of the course. I’ve got 24 half-hour lessons on cassette, a 230-page book, 100 pages of data, and 35 programs that 
will let you — not someone else’s software — “unleash the power of your computer.” 

If you’re skeptical, write to Green Mountain Micro. I’ll send you a copy of the table of contents and a sample page from 
the workbook. Or if you’re ready to get started right away, order your Micro Language Lab by phone or mail. 



What is the ultimate all-software music synthesizer 
for your TRS-80 Color Computer? 

What is the least expensive all-software music 
synthesizer for your Color Computer? 
Quaver ; the most realistic music experience you'll 
ever hear from your Color Computer! 

COLOR QUAVER 

Software Music Synthesizer 

(New Version 2. 1 for 32K ECB) 

by Dennis Bathory Kitsz author of “Custom Color” 

• Real Music Synthesis — More Than Bleeps! 

• Full 4- Part Harmony — In Precise T uning. 

• Versatile Editor/Compiler/Storage System. 

Entirely Software — No Hardware Needed. 

Variable Tone Qualities for Each Part. 

64-Step Variable Envelope for Each Part 
FAST Compiler — Finished Music in 5 Seconds! 

• Ready-to-Play Sample T unes Included. 

— Special Holiday Price — 

Only $19.95 on tape 

(Add $2.50 shipping and handling) 

(Not sure? Audition Our Sample Music Tape — $4.00 postpaid) 

For 32/64K TRS-80 Color Computers with Extended Color Basic. 




• Lowerkit II, $79.95 / $49.95 kit 

• 64K Color memory upgrade kit, $49.95 

• MC-10 added 4K upgrade kit, $19.95 

• CoCoPort interface, $49.95 / $39.95 kit 

• RAM/ROM pack, $29.95/ $19.95 kit 

• Color Burner, $49.95/ $39.95 kit (available January 1st) 

• BackPack battery backup, $39.95 (available January 1st) 

• Scroll- A-Roll software video text display, $24.95 

• TV Buff II, improved to handle virtually all monitors, $14.95 

(Add $2.50 shipping and handling) 



Green Mountain Micro 

Bathory Road • Roxbury, Vermont 05669 
(802) 485-6112 

Continuing support for Color Computer Model I/III and 100 

CODA/ISA/MASTERCARD Dealer Inquiries Invited. 



TRS-80 is a trademark of Tandy Corporation 
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7 Copy FPAC1 to FPAC2 
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; Sign of FPAC1 times FPAC2 
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♦excess byte 


03469 


BB8B 


BD 


BC14 


JSR 


$BC14 


7 Copy (=> X) to FPAC1 
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NEW GOOD 
STUFF FOR 
EVERY COLOR 
COMPUTER! 



MAGIGRAPH —Turn your Color Computer into a graphic design 
center with the ease of a keystroke! MagiGraph makes it simple to 
create highly detailed figures up to and including an entire high-resolu- 
tion screen. Designed for those with some experience in Basic and 
Assembly Language programming, MagiGraph includes: A full set of 
logical and pixel manipulation functions: a design editor; nine animation 
buffers; versatile I/O routines. If you’re looking for the finest graphic 
development utility available for your computer, THIS IS IT! Cassette 
$34.95 (16K required); Disk $39.95 (32K Extended Color BASIC 
required); Amdisk cartridge $44.95. 

CSPOOL: COLOR COMPUTER PRINT 

SPOOLER— Stop Waiting Around for the Printer! CSPOOL allows 
you to use your printer and computer concurrently, takes only 26 bytes 
of Color Basic’s memory, and gives you 32K of print buffer. It’s like 
having two computers in one! By intercepting characters sent to the 
printer and storing them in the upper 32K of RAM, CSPOOL allows you 
to run other programs while your printer is doing its job. CSPOOL is 
FREE with the purchase of a 64K RAM UPGRADE KIT from The Micro 
Works, or it may be purchased separately on cassette or diskette for 
$19.95. Requires 64K; not for FLEX or 0S9. 

64K MEMORY UPGRADE KIT: For Rev. levels E, ET, NC, TDP-IOOs, 
and Color Computer II. Eight prime 64K RAM chips, instructions, and 
CSPOOL: $64.95. 

MACRO-80C: DISK-BASED EDITOR, ASSEM- 
BLER AND MONITOR-a powerful 2-pass macro 
assembler with conditional assembly, local labels, include files and 
cross referenced symbol tables. Supports the complete Motorola 6809 
and 6800 instruction sets in standard source format. Incorporating all 
the features of our Rompack-based assembler (SDS-80C), MACR0-80C 
contains many more useful instructions and pseudo-ops which aid the 
programmer and add power and flexibility. The screen-oriented editor is 
designed for efficient and easy editing of assembly language programs. 
MACR0-80C allows global changes and moving / copying blocks of 
text. You can edit lines of assembly source which exceed 32 
characters. Also includes DCBUG, a machine language monitor which 
allows examining and altering of memory, setting break points, etc. 
MACR0-80C— along with sample programs— comes on one Radio 
Shack compatible disk. Extensive documentation. $99.95 

MICRO WORKS COLOR FORTH-This Rompack con 
tains everything you need to run Forth on your Color Computer. COLOR 
FORTH consists of the standard Forth Interest Group (FIG) implemen- 
tation plus most of FORTH-79. Includes super screen editor with split 
screen display, a decompiler and other aids for learning more about this 
fascinating language. Uses Hi-Res graphics, joysticks and sounds. 
Includes 112-page manual with a glossary of system-specific words, 
full standard FIG glossary and complete source listing. MICRO WORKS 
COLOR FORTH. . THE BEST! $109.95 

SDS-80C —Our famous Rompack editor, assembler and monitor. 
Complete manual included with this comprehensive software develop- 
ment system. $89.95 

PARALLEL PRINTER INTERFACE —Serial to parallel 
converter allows use of all standard parallel printers. 600 or 2400 baud. 
PI80C: $59.95 

MICROTEXT COMMUNICATIONS ROMPACK 

—Allows you to get printouts while using your modem. Also download 
to cassette. General purpose terminal Rompack; $59.95 

Write or call for information 

about our complete range of products for every Color Computer! 






P.O. BOX 1110-B 
Del Mar, CA 92014 
(619) 942-2400 



California Residents 
add 6% Tax 

MasterCard /Visa and 
COD Accepted 



Color Computer/101 



102/March 1984 



Line Object 

Number Address Code Mnemonic Operand 

Copy FPAC1 to variable or scratch 



Jake's Comment 



03551 


BC2F 


8E 


0040 


LDX 


*$0040 


;Scratch#l = destination 


03552 


BC32 


8C 


9E3B 


CMPX 


#$9E3B 


;Mask for following opcode 




BC33 


9E 


3B 


LDX 


<3B 


;Variable = destination 


03553 


BC35 


96 


4F 


LDA 


<$4F 


; Exponent 


03554 


BC37 


A7 


84 


STA 


,x 


; . . .saved 


03555 


BC39 


96 


54 


LDA 


<$54 


;If negative, bit 7=1 


03556 


BC3B 


8A 


7F 


ORA 


#$7F 


;Mask for other bits (0-6) 


03557 


BC3D 


94 


50 


ANDA 


<$50 


;If negative, bit 7=1 


03558 


BC3F 


A7 


01 


STA 


1,X 


;MSB saved 


03559 


BC41 


96 


51 


LDA 


<$51 


;Next MSB 


03560 


BC43 


A7 


02 


STA 


2 , X 




03561 


BC45 


DE 


52 


LDU 


<$52 


;Least significant word saved 


03562 


BC47 


EF 


03 


STU 


3,X 




03563 


BC49 


39 




RTS 






Copy FPAC2 to FPAC1 








03564 


BC4A 


96 


61 


LDA 


<$61 


;Sign 


03565 


BC4C 


97 


54 


STA 


<$54 




03566 


BC4E 


9E 


5C 


LDX 


<$5C 


; Exponent + MSByte 


03567 


BC50 


9F 


4F 


STX 


<$4F 




03568 


BC52 


OF 


63 


CLR 


<$63 


;Clear carry-out byte 


03569 


BC54 


96 


5E 


LDA 


<$5E 


;Next MSB 


03570 


BC56 


97 


51 


STA 


<$51 




03571 


BC58 


96 


54 


LDA 


<$54 


;Hold sign of FPACl 


03572 


BC5A 


9E 


5F 


LDX 


<$5F 


;Least Significant Word 


03573 


BC5C 


9F 


52 


STX 


<$52 




03574 


BC5E 


39 




RTS 






Copy FPACl to FPAC2 








03575 


BC5F 


DC 


4F 


LDD 


<$4F 


; Exponent + MSB 


03576 


BC61 


DD 


5C 


STD 


<$5C 




03577 


BC63 


9E 


51 


LDX 


<$51 


;Mid floating point 


03578 


BC65 


9F 


5E 


STX 


<$5E 




03579 


BC67 


9E 


53 


LDX 


<$53 


;Least significant byte + sign 


03580 


BC69 


9F 


60 


STX 


<$60 




03581 


BC6B 


4D 




TSTA 




;Set flags as per exponent 


03582 


BC6C 


39 




RTS 






Get sign of 


FPACl to B 








03583 


BC6D 


D6 


4F 


LDB 


<$.4F 


; Exponent 


03584 


BC6F 


27 


08 


BEQ 


$BC79 


;RTS if zero 


03585 


BC71 


D6 


54 


LDB 


<$54 


;Sign of FPACl 


03586 


BC73 


59 




ROLB 




; If negative, set carry 


03587 


BC74 


C6 


FF 


LDB 


#$FF' 


;-l 


03588 


BC76 


25 


01 


BLO 


$BC79 


; If negative 


03589 


BC78 


50 




NEGB 




;=1 if positive 


03590 


BC79 


39 




RTS 






SGN(x) 














03591 


BC7A 


8D 


FI 


BSR 


$BC6D 


;Get sign of FPACl 


03592 


BC7C 


D7 


50 


STB 


<$50 


;Save number in MSB 


03593 


BC7E 


OF 


51 


CLR 


<$51 


;Next MSB = 0 


03594 


BC80 


C6 


88 


LDB 


#$88 


; Exponent = 8 for one byte 


03595 


BC82 


96 


50 


LDA 


<$50 


;MSB 


03596 


BC84 


80 


80 


SUBA 


#$80 


;Set carry if positive 


03597 


BC86 


D7 


4F 


STB 


<$4F 


; Exponent 


03598 


BC88 


DC 


8A 


LDD 


<$8A 


;Zero constant 


03599 


BC8A 


DD 


52 


STD 


<$52 


;Zero all LSB's and round-up 


03600 


BC8C 


97 


63 


STA 


<$63 


; 


03601 


BC8E 


97 


54 


STA 


<$54 




03602 


BC90 


7E 


BA18 


JMP 


$BA18 


; Floating point normalize 



Line 




Object 






Number 


Address 


Code 


Mnemonic 


Operand 


Clear 


FPACl 


mantissa 






03662 


BD09 


D7 


50 


STB 


<$50 


03663 


BD0B 


D7 


51 


STB 


<$51 


03664 


BD0D 


D7 


52 


STB 


<$52 


03665 


BD0F 


D7 


53 


STB 


<$53 


03666 


BDll 


39 




RTS 




Convert ASCII number 


to FPACl 




03667 


BD12 


9E 


8A 


LDX 


<$8A 


03668 


BD14 


9F 


54 


STX 


<$54 


03669 


BD16 


9F 


4F 


STX 


<$4F 


03670 


BD1 8 


9F 


51 


STX 


<$51 


03671 


BD1A 


9F 


52 


STX 


<$52 


03672 


BD1C 


9F 


47 


STX 


<$47 


03673 


BD1E 


9F 


45 


STX 


<$45 


03674 


BD20 


25 


64 


BLO 


$BD86 


03675 


BD22 


BD 


0197 


JSR 


$0197 


03676 


BD25 


81 


2D 


CMPA 


#$2D 


03677 


BD27 


26 


04 


BNE 


$BD2D 


03678 


BD29 


03 


55 


COM 


<$55 


03679 


BD2B 


20 


04 


BRA 


$BD31 


03680 


BD2D 


81 


2B 


CMPA 


#$2B 


03681 


BD2F 


26 


04 


BNE 


$BD35 


03682 


BD31 


9D 


9F 


JSR 


<$9F 


03683 


BD33 


25 


51 


BLO 


$BD86 


03684 


BD35 


81 


2E 


CMPA 


#$2E 


03685 


BD37 


27 


28 


BEQ 


$BD61 


03686 


BD39 


81 


45 


CMPA 


#$45 


03687 


BD3B 


26 


28 


BNE 


$BD65 


03688 


BD3D 


9D 


9F 


JSR 


<$9F 


03689 


BD3F 


25 


64 


BLO 


$BDA5 


03690 


BD41 


81 


AC 


CMPA 


#$AC 


03691 


BD43 


27 


0E 


BEQ 


$BD53 


03692 


BD45 


81 


2D 


CMPA 


#$2D 


03693 


BD47 


27 


0A 


BEQ 


$BD53 


03694 


BD49 


81 


AB 


CMPA 


#$AB 


03695 


BD4B 


27 


08 


BEQ 


$BD55 


03696 


BD4D 


81 


2B 


CMPA 


#$2B 


03697 


BD4F 


27 


04 


BEQ 


$BD55 


03698 


BD51 


20 


06 


BRA 


$BD59 


03699 


BD53 


03 


48 


COM 


<$48 


03700 


BD55 


9D 


9F 


JSR 


<$9F 


03701 


BD57 


25 


4C 


BLO 


$BDA5 


03702 


BD59 


0D 


48 


TST 


<$48 


03703 


BD5B 


27 


08 


BEQ 


$BD65 


03704 


BD5D 


00 


47 


NEG 


<$47 


03705 


BD5F 


20 


04 


BRA 


$BD65 


03706 


BD61 


03 


46 


COM 


<$46 


03707 


BD63 


26 


CC 


BNE 


$BD31 


03708 


BD65 


96 


47 


LDA 


<$47 


03709 


BD67 


90 


45 


SUBA 


<$45 


03710 


BD69 


97 


47 


STA 


<$47 


03711 


BD6B 


27 


12 


BEQ 


$BD7F 


03712 


BD6D 


2A 


09 


BPL 


$BD78 


03713 


BD6F 


BD 


BB82 


JSR 


$BB82 


03714 


BD72 


0C 


47 


INC 


<$47 


03715 


BD74 


26 


F9 


BNE 


$BD6F 


03716 


BD76 


20 


07 


BRA 


$BD7F 


03717 


BD78 


BD 


BB6A 


JSR 


$BB6A 


03718 


BD7B 


OA 


47 


DEC 


<$47 


03719 


BD7D 


26 


F9 


BNE 


$BD78 


03720 


BD7F 


96 


55 


LDA 


<$55 


03721 


BD81 


2A 


8E 


BPL 


$BD11 


03722 


BD8 3 


7E 


BEE9 


JMP 


$BEE9 



Jake's Comment 

; *Zero 
;*to 

;*mantissa 

;*bytes 



;Literal zero 
;Sign 
; Exponent 
;Mantissa 
;Mantissa LSBs 
; Scratch location 
;Scratch location 
; If "0"-"9", add to FPAC1 * 10 
;RAM vector 
;"-"? 

;No, it’s positive 
;Flag negative 
;Parse and continue 

;No, assume positive 

; Parse next char 

; If add to FPAC1 * 10 

# II •» p 

; If decimal point 
; "E"? 

;Not "E", end of ASCII number 
; Parse next char 
; If "0" - "9", build exponent 
; token? 

;Yes, negative exponent 
character? 

;Yes, negative exponent 
token? 

; Yes , positive exponent 
character? 

; Yes , positive exponent 
;Not "+" nor positive exp 

;Flag negative exponent 
; Parse next 

; If "0" - "9", build exponent 
;Positive exponent? 

;Yes , exponent done 

;Else negate the built exponent 

; Exponent done 

;Flag decimal point 

?Cont parse if this 1st dec pt 

; Exponent 

; Minus # of digits after dec pt 
;New exponent 

;Mantissa OK if exponent = 0 

;If postve exponent, FPAC1 * 10 
; FPAC1 / 10 
;Exponent zero? 

;Continue mantissa scale if not 
;Else mantissa OK 
; FPAC1 * 10 
; Exponent zero? 

;Continue mantissa scale if not 
;Negative ASCII number? 

;RTS if not 
;Else negate FPAC1 



Color Computer/103 



ABS(n) 












03603 


BC93 


OF 


54 


CLR 


<$54 


03604 


BC95 


39 




RTS 




Compare FPAC1 to variable 






03605 


BC96 


E6 


84 


LDB 


,x 


03606 


BC98 


27 


D3 


BEQ 


$BC6D 


03607 


BC9A 


E6 


01 


LDB 


1,X 


03608 


BC9C 


D8 


54 


EORB 


<$54 


03609 


BC9E 


2B 


D1 


BMI 


$BC71 


03610 


BCA0 


D6 


4F 


LDB 


<$4F 


03611 


BCA2 


El 


84 


CMPB 


,x 


03612 


BCA4 


26 


ID 


BNE 


$BCC3 


03613 


BCA6 


E6 


01 


LDB 


1 » x 


03614 


BCA8 


CA 


7F 


ORB 


#$7F 


03615 


BCAA 


D4 


50 


ANDB 


<$50 


03616 


BCAC 


El 


01 


CMPB 


i,x 


03617 


BCAE 


26 


13 


BNE 


$BCC3 


03618 


BCB0 


D6 


51 


LDB 


<$51 


03619 


bqb2 


El 


02 


CMPB 


2 , X 


03620 


BCB4 


26 


0D 


BNE 


$BCC3 


03621 


BCB6 


D6 


52 


LDB 


<$52 


03622 


BCB8 


El 


03 


CMPB 


3 ,X 


03623 


BCBA 


26 


07 


BNE 


$BCC3 


03624 


BCBC 


D6 


53 


LDB 


<$53 


03625 


BCBE 


E0 


04 


SUBB 


4 , X 


03626 


BCC0 


26 


01 


BNE 


$BCC3 


03627 


BCC2 


39 




RTS 




03628 


BCC3 


56 




RORB 




03629 


BCC4 


D8 


54 


EORB 


<$54 


03630 


BCC6 


20 


AB 


BRA 


$BC73 


FPAC1 


to integer 






03631 


BCC8 


D6 


4F 


LDB 


<$4F 


03632 


BCCA 


27 


3D 


BEQ 


$BD09 


03633 


BCCC 


CO 


A0 


SUBB 


#$A0 


03634 


BCCE 


96 


54 


LDA 


<$54 


03635 


BCD0 


2A 


05 


BPL 


$BCD7 


03636 


BCD2 


03 


5B 


COM 


<$5B 


03637 


BCD4 


BD 


BA7B 


JSR 


$BA7B 


03638 


BCD7 


8E 


004F 


LDX 


#$004F 


03639 


BCDA 


Cl 


F8 


CMPB 


#$F8 


03640 


BCDC 


2E 


06 


BGT 


$BCE4 


03641 


BCDE 


BD 


BAAE 


JSR 


$BAAE 


03642 


BCE1 


OF 


5B 


CLR 


<$5B 


03643 


BCE3 


39 




RTS 




03644 


BCE4 


OF 


5B 


CLR 


<$5B 


03645 


BCE6 


96 


54 


LDA 


<$54 


03646 


BCE8 


49 




ROLA 




03647 


BCE9 


06 


50 


ROR 


<$50 


03648 


BCEB 


7E 


BABA 


JMP 


$BABA 


INT(FPACl) 










03649 


BCEE 


D6 


4F 


LDB 


<$4F 


03650 


BCF0 


Cl 


A0 


CMPB 


#$A0 


03651 


BCF2 


24 


ID 


BHS 


$BDll 


03652 


BCF4 


8D 


D2 


BSR 


$BCC8 


03653 


BCF6 


D7 


63 


STB 


<$63 


03654 


BCF8 


96 


54 


LDA 


<$54 


03655 


BCFA 


D7 


54 


STB 


<$54 


03656 


BCFC 


80 


80 


SUBA 


#$80 


03657 


BCFE 


86 


A0 


LDA 


#$A0 


03658 


BD00 


97 


4F 


STA 


<$4F 


03659 


BD02 


96 


53 


LDA 


<$53 


03660 


BD04 


97 


01 


STA 


<1 


03661 


BD06 


7E 


BA18 


JMP 


$BA18 



; Set FPAC1 sign positive 



; Exponent of variable 
; If zero do sign of FPAC1 
;MSB of variable 
;If signs are different... 
;...use FPAC1 sign 
;FPAC1 exponent 
; Compare exponents 
; If different 
;MSB of variable 
; Ignore lower bits 
; AND MSB of FPAC1 
ySame as variable? 
yNo, compare done 
;Next MSBs the same? 

yNo, compare done 
?Next LSBs the same? 

;No, compare done 
;LSBs the same? 

yNo, compare done 
;Zero flag set. FPAC1 =variable 
yCarry Flag to register B 
yAdjust result by sign of FPAC1 
yDo sign of difference 



y Exponent 

ylf zero. Reset FPAC1 to zero 
yExponent minus 32 
y Sign of FPAC1 
ylf positive 

y Negate the carry-in byte 
y Complement FPAC1 
y=> FPAC1 

; Less than 8 bits to shift? 
y Yes 

yStart shifting Byte by Byte 
y Reset the carry-in byte 

yReset the carry-in byte 

ySign in bit 7 ... 

y . . . to the carry flag 

ylnto MSB mantissa 

yShift mantissa right (-B) bits 



yExponent 

yExponent > 32? 

yRTS if no fractional part 

y Floating point to integer 

yZero carry-out byte 

ySiqn of FPAC1 

yZero the sign 

ySet carry flag as per sign 

ySet binary point to 32 ... 

y . . .to exponent 

ySave LSB 

yFloating point normalize 



Add ASCII # 


to 


FPAC1 * 10 






03723 


BD86 


D6 


45 


LDB 


<$45 


03724 


BD88 


DO 


46 


SUBB 


<$46 


03725 


BD8A 


D7 


45 


STB 


<$45 


03726 


BD8C 


34 


02 


PSHS 


A 


03727 


BD8E 


BD 


BB6A 


JSR 


$BB6A 


03728 


BD91 


35 


04 


PULS 


B 


03729 


BD93 


CO 


30 


SUBB 


#$30 


03730 


BD95 


8D 


02 


BSR 


$BD99 


03731 


BD97 


20 


98 


BRA 


$BD31 


Add B 


to FPAC1 








03732 


BD99 


BD 


BC2F 


JSR 


$BC2F 


03733 


BD9C 


BD 


BC7C 


JSR 


$BC7C 


03734 


BD9F 


8E 


0040 


LDX 


#$0040 


03735 


BDA2 


7E 


B9C2 


JMP 


$B9C2 


Build 


ASCII 


exponent in <$47 




03736 


BDA5 


D6 


47 


LDB 


<$47 


03737 


BDA7 


58 




ASLB 




03738 


BDA8 


58 




ASLB 




03739 


BDA9 


DB 


47 


ADDB 


<$47 


03740 


BDAB 


58 




ASLB 




03741 


BDAC 


80 


30 


SUBA 


#$30 


03742 


BDAE 


34 


04 


PSHS 


B 


03743 


BDB0 


AB 


E0 


ADDA 


,S+ 


03744 


BDB2 


97 


47 


STA 


<$47 


03745 


BDB4 


20 


9F 


BRA 


$BD55 


03746 


BDB6 


9B 


3E 


ADDA 


<$3E 


03747 


BDB8 


BC 


1FFD 


CMPX 


$1FFD 


03748 


BDBB 


9E 


6E 


LDX 


<$6E 


03749 


BDBD 


6B 








03750 


BDBE 


27 


FD 


BEQ 


$BDBD 


03751 


BDC0 


9E 


6E 


LDX 


<$6E 


03752 


BDC2 


6B 








03753 


BDC3 


28 


00 


BVC 


$BDC5 


Convert integer to ASCII & 


print 


it 


03754 


BDC5 


8E 


ABE7 


LDX 


#$ABE7 


03755 


BDC8 


8D 


OC 


BSR 


$BDD6 


03756 


BDCA 


DC 


68 


LDD 


<$68 


03757 


BDCC 


DD 


50 


STD 


<$50 


03758 


BDCE 


C6 


90 


LDB 


#$90 


03759 


BDD0 


43 




COMA 




03760 


BDD1 


BD 


BC86 


JSR 


$BC86 


03761 


BDD4 


8D 


03 


BSR 


$BDD9 


03762 


BDD6 


7E 


B99C 


JMP 


$B99C 


Convert FPAC1 to ASCII 






03763 


BDD9 


CE 


03DA 


LDU 


#$03DA 


03764 


BDDC 


86 


20 


LDA 


#$20 


03765 


BDDE 


D6 


54 


LDB 


<$54 


03766 


BDE0 


2A 


02 


BPL 


$BDE4 


03767 


BDE2 


86 


2D 


LDA 


#$2D 


03768 


BDE4 


A7 


CO 


STA 


,u+ 


03769 


BDE6 


DF 


64 


STU 


<$64 


03770 


BDE8 


97 


54 


STA 


<$54 


03771 


BDEA 


86 


30 


LDA 


#$30 


03772 


BDEC 


D6 


4F 


LDB 


<$4F 


03773 


BDEE 


1027 00C6 


LBEQ 


$BEB8 


03774 


BDF2 


4F 




CLRA 




03775 


BDF3 


Cl 


80 


CMPB 


#$80 


03776 


BDF5 


22 


08 


BHI 


$BDFF 


03777 


BDF7 


8E 


BDC0 


LDX 


# $BDC0 


03778 


BDFA 


BD 


BACA 


JSR 


$BACA 



yCurrent # digits after dec pt 
yBump if dec point encountered 
yNew # of digits after dec pt 
ySave ASCII character number 
yFPACl * 10 
yConvert ASCII # ... 
y...to integer byte 
yFPACl = FPAC1 + B 
yNext ASCII character 



yFPACl to scratch at <$40 
yConvert byte to F.P. in FPAC1 
y=> Scratch 

yFPACl = FPAC1 + scratch 



y ASCI I exponent 
y Times two 
yTimes four 
y Times five 
yTimes ten 

y ASCII to integer in A 
yAdd A + B 

y Update exponent 
yContinue building exponent 

yFloating point 
y literal 99,999,999.9 
yFloating point 
y literal 
,*999,999,999 
yFloating point 
y literal 
yl E 09 



;=>" in " 
y Print " IN " 
yLine number 

ySave line number as integer 
yExponent =16 

ySet carry flag to force pos . 
yConvert to Floating Point 
yConvert to ASCII 
y Print message 



ASCII number buffer 
Default prefix = " " 

Sign of number 
If positive 
Else sign is 

Place sign prefix in buffer 
Hold buffer position 
Hold prefix character 
ASCII zero in case FPAC1 = 0 
Exponent = 0? 

Return "0" if so 
Initlz # of digits aftr dec pt 
Exponent 
If number >= 1 
=> floating point # l.E+09 
F.P. multiply FPAC1 * l.E+09 
t more 



104/March 1984 



Line 




Object 








Number 


Address 


Code 


Mnemonic 


Operand Jake's Comment 


03779 


BDFD 


86 


F7 


LDA 


#$F7 


9 digits req'd to adjst dec pt 


03780 


BDFF 


97 


45 


STA 


<$45 


Number of digits after dec pt 


03781 


BE01 


8E 


BDBB 


LDX 


#$BDBB 


=> floatng point nr 999999999 


03782 


BE04 


BD 


BCA0 


JSR 


$BCA0 


Compare FPAC1 to 999999999 


03783 


BE07 


2E 


OF 


BGT 


$BE18 


If FPAC1 is bigger 


03784 


BE09 


8E 


BDB6 


LDX 


#$BDB6 


=> floatng point nr 99999999.9 


03785 


BE0C 


BD 


BCA0 


JSR 


$BCA0 


Compare FPAC1 to 99999999.9 


03786 


BE0F 


2E 


0E 


BGT 


$BE1F 


If FPACl is bigger 


03787 


BE11 


BD 


BB6A 


JSR 


$BB6A 


FPAC1 * 10 


03788 


BE14 


0A 


45 


DEC 


<$45 


Move dec pnt one place back 


03789 


BE16 


20 


FI 


BRA 


$BE09 




03790 


BE18 


BD 


BB82 


JSR 


$BB82 


Divide FPACl by ten 


03791 


BE1B 


OC 


45 


INC 


<$45 


Move dec pnt 1 place forward 


03792 


BE1D 


20 


E2 


BRA 


$BE01 




03793 


BE1F 


BD 


B9B4 


JSR 


$B9B4 


FPACl + .5 


03794 


BE22 


BD 


BCC8 


JSR 


$BCC8 


FPACl to integer 


03795 


BE25 


C6 


01 


LDB 


#1 


Default # digits after dec pt 


03796 


BE27 


96 


45 


LDA 


<$45 


# digits to adjust dec pt 


03797 


BE29 


8B 


OA 


ADDA 


#$0A 


Dec pnt fits within FPACl? 


03798 


BE2B 


2B 


09 


BMI 


$BE36 


If > 9 zeros after dec pt 


03799 


BE2D 


81 


OB 


CMPA 


#$0B 


> 10 characters before dec pt? 


03800 


BE2F 


24 


05 


BHS 


$BE36 


Yes, setup decimal exponent 


03801 


BE31 


4A 




DECA 




Adjust # chars before dec pt 


03802 


BE32 


IF 


89 


TFR 


A,B 


Into B 


03803 


BE34 


86 


02 


LDA 


#2 


Decimal exponent not needed 


03804 


BE36 


4A 




DECA 




Adjust. . . 


03805 


BE37 


4A 




DECA 




...decimal exponent 


03806 


BE38 


97 


47 


STA 


<$47 


Save decimal Exponent 


03807 


BE3A 


D7 


45 


STB 


<$45 


# of chars before dec pt 


03808 


BE3C 


2E 


OD 


BGT 


$BE4B 


If chars needed before dec pt 


03809 


BE3E 


DE 


64 


LDU 


<$64 


Current ASCII buffer position 


03810 


BE40 


86 


2E 


LDA 


#$2E 


N ■ 


03811 


BE42 


A7 


CO 


STA 


,u+ 


Decimal point to buffer 


03812 


BE44 


5D 




TSTB 




Any zeros after decimal point? 


03813 


BE45 


27 


04 


BEQ 


$BE4B 


If not 


03814 


BE47 


86 


30 


LDA 


#$30 


ASCII zero 


03815 


BE49 


A7 


CO 


STA 


,u+ 


To buffer 


03816 


BE4B 


8E 


BEC5 


LDX 


# $BEC5 


=> Conversion list 


03817 


BE4E 


C6 


80 


LDB 


#$80 


Initialize exponent 


03818 


BE50 


96 


53 


LDA 


<$53 


LSB 


03819 


BE52 


AB 


03 


ADDA 


3 /X 




03820 


BE54 


97 


53 


STA 


<$53 




03821 


BE56 


96 


52 


LDA 


<$52 ; 


;Next LSB 


03822 


BE58 


A9 


02 


ADC A 


2 ,X 




03823 


BE5A 


97 


52 


STA 


<$52 




03824 


BE5C 


96 


51 


LDA 


<$51 


?Next MSB 


03825 


BE5E 


A9 


01 


ADCA 


i,x 




03826 


BE60 


97 


51 


STA 


<$51 




03827 


BE62 


96 


50 


LDA 


<$50 


;MSB 


03828 


BE64 


A9 


84 


ADCA 


,x 




03829 


BE66 


97 


50 


STA 


<$50 




03830 


BE68 


5C 




INCB 




Bump # of subtrctns/additns 


03831 


BE69 


56 




RORB 




Adjust to test for overflow 


03832 


BE6A 


59 




ROLB 




Check if went too far 


03833 


BE6B 


28 


E3 


BVC 


$BE50 


If no overflow, do another 


03834 


BE6D 


24 


03 


BHS 


$BE72 


If subtrctng, this time around 


03835 


BE6F 


CO 


OB 


SUBB 


#$0B 


Else B is one too far negative 


03836 


BE71 


50 




NEGB 




Adjust B ( 1-A) 


03837 


BE72 


CB 


2F 


ADDB 


#$2F 


Cvrt to ASCII #-went 1 too far 


03838 


BE74 


30 


04 


LEAX 


4 / X 


=> next in list 


03839 


BE76 


IF 


98 


TFR 


B , A 


ASCII digit to A 


03840 


BE78 


84 


7F 


ANDA 


# $7F 


Remove possible high bit 


03841 


BE7A 


A7 


CO 


STA 


,u+ 


To buffer 


03842 


BE7C 


0A 


45 


DEC 


<$45 


1 less digit before dec pt 


03843 


BE7E 


26 


04 


BNE 


$BE84 


If not at decimal point 



Line Object 

Number Address Code Mnemonic Operand Jake's Comment 

Do required number in series 



03905 


BEFF 


9F 


64 


STX 


<$64 


;Save pointer 


03906 


BF01 


BD 


BC2A 


JSR 


$BC2A 


; FPACl = FPACl + scratchl 


03907 


BF04 


9E 


64 


LDX 


<$64 


;Restore pointer 


03908 


BF06 


E6 


80 


LDB 


,x+ 


; Number of iterations to B 


03909 


BF08 


D7 


55 


STB 


<$55 


;Save as a loop counter 


03910 


BF0A 


9F 


64 


STX 


<$64 


;Save pointer 


03911 


BF0C 


8D 


EE 


BSR 


$BEFC 


; F . P. multply scratchl * FPACl 


03912 


BF0E 


9E 


64 


LDX 


<$64 


;Restore pointer 


03913 


BF10 


30 


05 


LEAX 


5 ,X 


;Bump to next in table 


03914 


BF12 


9F 


64 


STX 


<$64 


;Save pointer 


03915 


BF14 


BD 


B9C2 


JSR 


$B9C2 


; FPACl + table entry 


03916 


BF17 


8E 


0045 


LDX 


#$0045 


;=> scratch2 


03917 


BFlA 


0A 


55 


DEC 


<$55 


;More to do? 


03918 


BFlC 


26 


EE 


BNE 


$BF0C 


;If so 


03919 


BF1E 


39 




RTS 






RND(x) 














03920 


BFlF 


BD 


BC6D 


JSR 


$BC6D 


;Sign to B 


03921 


BF22 


2B 


21 


BMI 


$BF45 


;If negative 


03922 


BF24 


27 


15 


BEQ 


$BF3B 


;If zero 


03923 


BF26 


8D 


10 


BSR 


$BF38 


; If > 0 do INT(x) 


03924 


BF28 


BD 


BC2F 


JSR 


$BC2F 


/Copy FPACl to scratchl 


03925 


BF2B 


8D 


0E 


BSR 


$BF3B 


;Get RND(0) 


03926 


BF2D 


8E 


0040 


LDX 


#$0040 


;=> random number range 


03927 


BF30 


8D 


CA 


BSR 


$BEFC 


? F . P. multply scratchl * FPACl 


03928 


BF32 


8E 


BAC5 


LDX 


#$BAC5 


;=> F. P. # 1.0 


03929 


BF35 


BD 


B9C2 


JSR 


$B9C2 


;Add 1.0 to number 


03930 


BF38 


7E 


BCEE 


JMP 


$BCEE 


; INT( x) 


RND( 0 ) 














03931 


BF3B 


BE 


0116 


LDX 


$0116 


; Current seed to FPACl 


03932 


BF3E 


9F 


50 


STX 


<$50 




03933 


BF40 


BE 


0118 


LDX 


$0118 




03934 


BF43 


9F 


52 


STX 


<$52 




03935 


BF45 


BE 


BF74 


LDX 


$BF7 4 


;Set up FPAC2 


03936 


BF48 


9F 


5D 


STX 


<$5D 




03937 


BF4A 


BE 


BF76 


LDX 


$BF76 




03938 


BF4D 


9F 


5F 


STX 


<$5F 




03939 


BF4F 


BD 


BAD0 


JSR 


$BAD0 


;Multiply 


03940 


BF52 


DC 


AD 


LDD 


<$AD 


;Last truncated by F.P. multply 


03941 


BF54 


C3 


658B 


ADDD 


#$658B 




03942 


BF57 


FD 


0118 


STD 


$0118 


;New seed 


03943 


BF5A 


DD 


52 


STD 


<$52 


;Into Least Signfcnt Word FPACl 


03944 


BF5C 


DC 


AB 


LDD 


<$AB 


; Last truncatd by F.P. multiply 


03945 


BF5E 


C9 


B0 


ADCB 


#$B0 




03946 


BF60 


89 


05 


ADCA 


#5 


;Form new seed 


03947 


BF62 


FD 


0116 


STD 


$0116 


? Store new seed 


03948 


BF65 


DD 


50 


STD 


<$50 


; FPACl 


03949 


BF67 


OF 


54 


CLR 


<$54 


;Set sign positive 


03950 


BF69 


86 


80 


LDA 


#$80 


;Set 0 < RND# < 1 


03951 


BF6B 


97 


4F 


STA 


<$4F 




03952 


BF6D 


96 


15 


LDA 


<$15 


;FPAC3 next LSB 


03953 


BF6F 


97 


63 


STA 


<$63 


; Becomes FPAC2 F.P. excess 


03954 


BF71 


7E 


BA1C 


JMP 


$BA1C 


;Normalize 


03955 


BF74 


40 




NEGA 






03956 


BF75 


E6 


4D 


LDB 


$0D,U 




03957 


BF77 


AB 


BDBC5F 


ADDA 


<-$43A,PC) 




SIN(n) 
















BF78 


BD 


BC5F 


JSR 


$BC5F 


;Copy FPACl to FPAC2 


03958 


BF7B 


8E 


BFBD 


LDX 


#$BFBD 


;=> 6.28 (2 pi) 


03959 


BF7E 


D6 


61 


LDB 


<$61 


;Sign of FPAC2 
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03844 


BG80 


86 


2E 


LDA 


#$2E 


Else decimal point... 


03845 


BG82 


A7 


CO 


STA 


,U+ 


. . .to buffer 


03846 


BG84 


53 




COMB 




Rvrs hi bit,chk oppst ovrflw 


03847 


BE85 


C4 


80 


ANDB 


#$80 


Extract high bit 


03848 


BE87 


8C 


BEE9 


CMPX 


#$BEE9 


At the end of the list? 


03849 


BE8A 


26 


C4 


BNE 


$BE50 


Continue until done 


03850 


BE8C 


A6 


C2 


LDA 


,-u 


Get next character back 


03851 


BE8E 


81 


30 


CMPA 


#$30 


ASCII zero? 


03852 


BE90 


27 


FA 


BEQ 


$BE8C 


Yes, backup until not "0" 


03853 


BE92 


81 


2E 


CMPA 


#$2E 


Dec pt before trailing zeros? 


03854 


BE94 


26 


02 


BNE 


$BE98 


If not 


03855 


BE96 


33 


5F 


LEAU 


-i,u 


Else backup over dec pt 


03856 


BE98 


86 


2B 


LDA 


#$2B 


" + " for possible dcml exponent 


03857 


BE9A 


D6 


47 


LDB 


<$47 


"E" exponent number 


03858 


BE9C 


27 


1C 


BEQ 


$BEBA 


Out if no dcml exponent req'd 


03859 


BE9E 


2A 


03 


BPL 


$BEA3 


If positive decimal exponent 


03860 


BEA0 


86 


2D 


LDA 


#$2D 




03861 


BEA2 


50 




NEGB 




Cnvrt exponent to postve nmbr 


03862 


BEA3 


A7 


42 


STA 


2,U 


Exponent sign 


03863 


BEA5 


86 


45 


LDA 


#$45 


"E" 


03864 


BEA7 


A7 


41 


STA 


i,u 


Save decimal exponent "E" 


03865 


BEA9 


86 


2F 


LDA 


#$2F 


Initialize ASCII number 


03866 


BEAB 


4C 




INCA 




Build tens digit in A 


03867 


BE AC 


CO 


OA 


SUBB 


#$0A 


minus ten 


03868 


BEAE 


24 


FB 


BHS 


$BEAB 




03869 


BEB0 


CB 


3A 


ADDB 


#$3A ; 


[Make B the ASCII units digit 


03870 


BEB2 


ED 


43 


STD 


3,U ; 


; ASCI I dcml exponent to buffer 


03871 


BEB4 


6F 


45 


CLR 


5 ,U ; 


; Delimit 


03872 


BEB6 


20 


04 


BRA 


$BEBC 




03873 


BEB8 


A7 


C4 


STA 


,U ! 


[If variable = 0 only 


03874 


BEBA 


6F 


41 


CLR 


1,U ; 


[Delimit string 


03875 


BEBC 


8E 


03DA 


LDX 


#$ 03DA 


[=> ASCII string 


03876 


BEBF 


39 




RTS 






Floating point 


constants 








03877 


BEC0 


80 


00 


SUBA 


#0 


in 

o 


03878 


BEC2 


00 


00 


NEG 


<0 




03879 


BEC4 


00 


FA 


NEG 


<$FA 


;F.P. conversion constants 


03880 


BEC6 


0A 


IF 


DEC 


<$1F 




03881 


BEC8 


00 


00 


NEG 


<0 




03882 


BECA 


98 


96 


EORA 


<$96 




03883 


BECC 


80 


FF 


SUBA 


#$FF 




03884 


BECE 


F0 


BDCO 


SUBB 


$BDC0 




03885 


BED1 


00 


01 


NEG 


<1 




03886 


BED3 


86 


AO 


LDA 


#$A0 




03887 


BED5 


FF 


FFD8 


STU 


$FFD8 




03888 


BED8 


F0 


0000 


SUBB 


0 




03889 


BEDB 


03 


E8 


COM 


<$E8 




03890 


BEDD 


FF 


FFFF 


STU 


$FFFF 




03891 


BEE0 


9C 


00 


CMPX 


<0 




03892 


BEE2 


00 


00 


NEG 


<0 




03893 


BEE4 


0A 


FF 


DEC 


<$FF 




03894 


BEE6 


FF 


FFFF 


STU 


$FFFF 




Negate 


FPAC1 










03895 


BEE9 


96 


4F 


LDA 


<$4F 


; Exponent FPAC1 


03896 


BEEB 


27 


02 


BEQ 


$BEEF 


;RTS if zero 


03897 


BEED 


03 


54 


COM 


<$54 


;Else reverse sign of FPAC1 


03898 


BEEF 


39 




RTS 




Summation 












03899 


BEF0 


9F 


64 


STX 


<$64 


;Save pointer to series table 


03900 


BEF2 


BD 


BC2F 


JSR 


$BC2F 


; FPAC1 to scratchl at 0040 


03901 


BEF5 


8D 


05 


BSR 


$BEFC 


; F . P. multply scratchl * FPAC1 


03902 


BEF7 


8D 


08 


BSR 


$BF01 


;Do required # iterations 


03903 


BEF9 


8E 


0040 


LDX 


#$0040 


;=> Scratchl 


03904 


BEFC 


7E 


BACA 


JMP 


$BACA 


;F. P. multply scratchl * FPAC1 




03960 


BF80 


BD 


BB89 


JSR 


$BB89 


n divided by 2 pi 


03961 


BF83 


BD 


BC5F 


JSR 


$BC5F 


Copy FPAC1 to FPAC2 


03962 


BF86 


8D 


B0 


BSR 


$BF38 


INT( n/2pi ) to FPAC1 


03963 


BF88 


OF 


62 


CLR 


<$62 


Set sign of result positive 


03964 


BF8A 


96 


5C 


LDA 


<$5C 


(n/2 pi) exponent 


03965 


BF8C 


D6 


4F 


LDB 


<$4F 


INT (n/2 pi) exponent 


03966 


BF8E 


BD 


B9BC 


JSR 


$B9BC 


F. P. subtract 


03967 


BF91 


8E 


BFC2 


LDX 


#$BFC2 


=> 0.25 


03968 


BF94 


BD 


B9B9 


JSR 


$B9B9 


F.P. subtract 


03969 


BF97 


96 


54 


LDA 


<$54 


FPAC1 sign 


03970 


BF99 


34 


02 


PSHS 


A 


Save it 


03971 


BF9B 


2A 


09 


BPL 


$BFA6 


If positive 


03972 


BF9D 


BD 


B9B4 


JSR 


$B9B4 


FPAC1 +0.5 


03973 


BFA0 


96 


54 


LDA 


<$54 


Sign of FPAC1 


03974 


BFA2 


2B 


05 


BMI 


$BFA9 


If negative 


03975 


BFA4 


03 


0A 


COM 


<$0A 




03976 


BFA6 


BD 


BEE9 


JSR 


$BEE9 ; 


[Negate FPAC1 


03977 


BFA9 


8E 


BFC2 


LDX 


#$BFC2 


[=> 0.25 


03978 


BFAC 


BD 


B9C2 


JSR 


$B9C2 ; 


[ FPAC1 +0.25 


03979 


BFAF 


35 


02 


PULS 


A ; 


; FPAC1 sign 


03980 


BFB1 


4D 




TSTA 




[Positive? 


03981 


BFB2 


2A 


03 


BPL 


$BFB7 ; 


[If so 


03982 


BFB4 


BD 


BEE9 


JSR 


$BEE9 


[Else negate FPAC1 


03983 


BFB7 


8E 


BFC7 


LDX 


#$BFC7 ; 


[=> SIN coefficient table 


03984 


BFBA 


7E 


BEF0 


JMP 


$BEF0 


: Compute series and RTS 


SIN Constants 










03985 


BFBD 


83 


490F 


SUBD 


# $490F 


6.28 (2 pi) 


03986 


BFC0 


DA 


A2 


ORB 


<$A2 




03987 


BFC2 


7F 


0000 


CLR 


0 


0.25 


03988 


BFC5 


00 


00 


NEG 


<0 




SIN Coefficient table 








03989 


BFC7 


05 








[Number of entries in table 


03990 


BFC8 


84 


E6 


ANDA 


#$E6 




03991 


BFCA 


1A 


2D 


ORCC 


#$2D 




03992 


BFCC 


IB 










03993 


BFCD 


86 


28 


LDA 


#$28 




03994 


BFCF 


07 


FB 


ASR 


<$FB 




03995 


BFDl 


F8 


8799 


EORB 


$8799 




03996 


BFD4 


68 


890187 


ASL 


$0187, X 




03997 


BFD8 


23 


35 


BLS 


$C00F 




03998 


BFDA 


DF 


El 


STU 


<$E1 




03999 


BFDC 


86 


A5 


LDA 


#$A5 




04000 


BFDE 


5D 




TSTB 






04001 


BFDF 


E7 


28 


STB 


8,Y 




04002 


BFE1 


83 


490F 


SUBD 


#$490F 




04003 


BFE4 


DA 


A2 


ORB 


<$A2 




04004 


BFE6 


Al 


54 


CMPA 


-$0C,U 




04005 


BFE8 


46 




RORA 






04006 


BFE9 


8F 










04007 


BFEA 


13 




SYNC 






04008 


BFEB 


8F 










04009 


BFEC 


52 










04010 


BFED 


43 




COMA 






04011 


BFEE 


89 


CD 


ADCA 


#$CD 




04012 


BFF0 


A6 


81 


LDA 


,X++ 




04013 


BFF2 


01 










04014 


BFF3 


00 


01 


NEG 


<1 




04015 


BFF5 


03 


01 


COM 


<1 




04016 


BFF7 


OF 


01 


CLR 


<1 




04017 


BFF9 


OC 


01 


INC 


<1 




04018 


BFFB 


06 


01 


ROR 


<1 




04019 


BFFD 


09 


A0 


ROL 


<$A0 




04020 


BFFF 


27 


7E 


BEQ 


$C07F 


l 

l 

i 




I WANTED A PROGRAM which could 
easily read a data file from tape so I 
could produce several graphics rep- 
resentations without changing data 
statements in a program, could rotate an 
object about more than one axis at a 
time, could change distance from the ob- 
ject (a zoom lens effect), and could dis- 
play a continuous rotation without stop- 
ping to calculate between each position. 
The program should also have a fast, 
smooth display, and be easy to operate. 
I also wanted hidden line removal, but 
found the memory limitations (both the 
computer's and mine) to fall short of the 
goal. 

I wrote a program that would meet my 
requirements. This program reads a data 
file from tape, and then calculates and 
displays an object. To get the data file on 
tape, I wrote a drawing editor. I was sur- 
prised to find that it was about twice as 
long as the rotation program after I in- 
cluded everything I needed in the editor. 
To use the editor, we must define an ob- 
ject as a list of three-dimensional line co- 
ordinates. 

Defining 3-D Objects 

An easy way to define the coordinates 
of a three-dimensional object is to draw 
side, front, and top views of the object 
on graph paper, then make a list of the 
X, Y, and Z coordinates of the two end- 
points of each line in the object. 

For example, let's define the coordi- 
nates of a simple object: a cabin. First 
draw the side, front, and top views of the 
cabin on graph paper (see Figure 1).Then 
list coordinates along the edges of the 
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graph paper, counting from 0, 0, 0 in the 
very center of the cabin. Next label the X 
axis along the length of the cabin, the Y 



axis across the width, and label the Z axis 
vertically. 

We are now ready to make our list. We 
can start with any line, but we must keep 
track of those we have finished. Do this 
by numbering each line or working from 
one end of the object to the other. For 
this demonstration, I have numbered the 
lines. For the line numbered one, the coor- 



50 



SIDE VIEW 



FRONT VIEW 



TOP VIEW 



-40 

-25 



— 40 



-50 




-35 



0 - 



35 - 



50 




-50 



Figure 7. Defining Cabin Coordinates 
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dinates are: X = 50, Y = 35, Z = -40 
toX = -50, Y = 35, Z = -40. Continue 
the list until both end coordinates of all 
the lines have been defined (see Figure 
2). On complex objects, it also helps to 
label the lines in the list (for instance, 
lines 1 through 4 are the west wall). 

Using the Editor 

Now our object has been defined as a 
set of coordinates, we must make a tape 
file of this list. Type in and CSAVE Pro- 
gram Listing 1 . Then type: pcleari xlear 
20,16383. This clears the graphics memory 
for use by Basic, and sets the upper limit 
of memory to 1 6383 bytes. If you try to 
run the program without first entering 
these commands, Basic will execute the 
first line and then stop. Running the pro- 
gram again will work fine. 

The first screen you will see is the main 
menu. Since we are entering a new pic- 
ture, hit 1 and Enter. Now you can enter 
the coordinates from Figure 2, first typ- 
ing the first three numbers (in the From 
column) separated by commas, hitting 
Enter, then the second three numbers (in 
the To column) separated by commas. 
When all the lines have been entered, hit 
999 followed by two commas, and Enter. 
This tells the editor you are finished en- 
tering new lines and it will return to the 
main menu. 

To check your entries, hit 2, for Edit. 
When the Edit menu appears, hit 4 for 
List. Check each entry carefully, writing 
down any line numbers in error. If you 
need to make any corrections when the 
Edit menu reappears, hit the appropriate 
number and the line number if needed. 
Lines are changed or added one at a time 
by typing the correct coordinates. 

When you have a correct listing, return 
to the main menu (hit 5). Now hit 3 to 
save your listing to tape. The screen will 
say working.... Don't panic, it is not sav- 
ing yet. It is storing the data in high mem- 
ory, from where it will CSAVEM the pro- 
gram. When the computer is ready, it will 
ask for a drawing name. Enter any appro- 
priate name (for instance: cabin). When 
it is finished saving, return to the main 
menu and load the file you just saved. List 
it and check that everything is correct. 

Displaying an Object 

Type in and CSAVE Program Listing 2. 
Then type: pclear8:CI_eario,16383. If you 
run this program without first entering 
these commands, the program will run 
until just before the display and then 
quit. 

The program first loads your data file 
from tape into high memory (Lines 40 - 



Line 




From 






To 






No. 


X 


Y 


Z 


X 


Y 


Z 




1 


50, 


35, 


-40 


-50, 


35, 


-40 




2 


-50, 


35, 


-40 


-50, 


35, 


25 


West 


3 


50, 


35, 


-40 


50, 


35, 


25 


Wall 


4 


50, 


35, 


25 


-50, 


35, 


25 




5 


50, 


-35, 


-40 


-50, 


-35, 


-40 




6 


-50, 


-35, 


-40 


-50, 


-35, 


25 


East 


7 


50, 


-35, 


-40 


50, 


-35, 


25 


Wall 


8 


50, 


-35, 


25 


-50, 


-35, 


25 




9 


-50, 


35, 


-40 


-50, 


-35, 


-40 




10 


50, 


35, 


-40 


50, 


-35, 


-40 


Ends 


11 


-50, 


35, 


25 


-50, 


-35, 


25 




12 


50, 


35, 


25 


50, 


-35, 


25 




13 


-50, 


-35, 


25 


-50, 


0 , 


40 




14 


-50, 


35, 


25 


-50, 


0 , 


40 




15 


50, 


-35, 


25 


50, 


0 , 


40 


Roof 


16 


50, 


35, 


25 


50, 


0 , 


40 




17 


-50, 


0 , 


40 


50, 


0 , 


40 





Figure 2. L ine L ist For the Cabin 



80). It then finds how many lines are in 
the object (variable LC for Line Count) 
and tells you how many steps you may 
have according to memory limits (Line 
90). See Figure 3 for typical number of 
steps. 

Line 1 10 asks for the position for the 
starting view of the object. The distance 
is your distance from the object. The 
angle around is your horizontal angle in 
degrees from the X axis. The elevation 
angle is your vertical angle in degrees 
from the Z axis (see Figure 4). The first 
time through (with the cabin drawing) 
use a distance 1 of 3000, and angle 
around 1 of 90 degrees, an elevation 
angle 1 of 75 degrees, a distance 2 of 
1 500, an angle around 2 of 1 60 degrees, 
and an elevation angle 2 of 45 degrees. 
Line 150 asks for the number of steps. 
For the first time try only five steps. 

Lines 1 60 through 320 get the coordi- 



Lines 


Steps 


Computing Time 




Available 


(for 14 steps) 


256 


14 


16.5 minutes 


128 


28 


8.25 minutes 


64 


57 


248 seconds 


32 


115 


1 24 seconds 


17 


218 


67 seconds 



Figure3. Time and Steps 



nates of the object from high memory 
(addresses 1 6385 - 1 7920) and calculate 
their positions for each of your points of 
view. This data is stored in high memory 
(addresses 17921 -32767). This process 
is very slow since the computer has to 
handle so many numbers. To calculate 
five positions for the 1 7 lines in the cabin 
it will take about 25 seconds. For more 
complex objects this can take up to 1 6 Vi 
minutes. 



Program Listing 1. 3D Editor 

10 CLEAR20, 16383: PCLEARI 
20 '3D EDITOR by Dale A. Keller 
40 DIM A ( 1536 ) 

50 CLS : PR I NT "NEW PICTURE (1)":PR 
INT"EDIT OLD PICTURE ( 2 ) " : PRINT" 
SAVE ( 3 ) " : PR I NT "LOAD (4)":INPUT 
A 

60 ON A GOTO 80,210,650,800 
70 GOTO 50 

80 'DRAW NEW PICTURE 

90 CLS : PRINT " NEW PICTURE" : PRINT" 

HIT 999 TO EXIT" : PRINT 
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'the other halfe 
of the < TRS-8®|> 

THE MINDl 



HmvTOBorr 

on the TRJS-W 



THE BOOK YOU 
CAN BOTH READ 
jVND UNDERSTAND 



William^?* 

Barden?<lrJ| 

. * •' i ’ . i* . * ^ ■ 



IJG books are sold at booksellers and computer 
dealers world wide. If your dealer is out of stock, order 
direct. Include $4.00 for shipping and handling. 
Foreign residents include $ 1 1 .00 in U.S. funds for 
shipping and handling. IJG, Inc., 1953 West 1 1th St. 
Upland, California 9 1 786. (714) 946-5805 

© Enter 58 on TeleResponse page 159 



CompuThoughts 

I can’t begin to tell you 
everything about this 
book— it’s unusuaL The first 
things you notice about it 
are that it has no page 
numbers and the “table of 
contents” has over 2,000 
entries in alphabetical order. 
Here’s why: 

We use TRS-80s— from 
accounting to typesetting. 

The variations of BASIC, 
applications software, hard- 
ware and operating systems 
is more than can be 
remembered. Nothing 
gets done when your nose 
is in a manual 
Why can’t “they*’ make a 
book that has everything in 
one place? Hell’s fire, “we” 
are “they!” I told Bill Barden 
that if he would write such a 
book I would do two things: 

1) I’d publish it and 2) I 
would quit bitching. 

I use it everyday. It 
answers my questions* It’ll 



answer yours 



The Thoughtware Company. 




Figure 5. L ine L ist For a Space Shuttle 



z 




Figure 4. Angle and Distance 
Measurements 

When the computing is finished, the 
computer will ask if you are ready and 
play a short tune (make sure the volume 
is turned up on the TV so you can hear 
it from the refrigerator. Like I said, some 
of these rotations take a long time to 
compute). 

Lines 330 and on draw the displays on 
alternating screens. For simple objects 
this is a fairly quick process. Complex ob- 
jects are slower, but you still appear to be 
moving around the object. When the dis- 
play stops, hitting any key will take you 
to a short menu in Line 470. The rotation 
can be viewed again immediately since it 
has already been figured, or you can ro- 
tate the same object through different 
angles. 

There are some limitations to this pro- 
gram. You may only use up to 256 lines. 
The object should be centered on the co- 
ordinates 0, 0, 0 to rotate smoothly on its 
center. Lines must have coordinates in 
the range of -128 to 127. There is no 
line clipping routine, so lines must be 
within the graphics screen dimensions. If 
you use too short a distance, values of 
less than 0 or greater than 255 will be 
computed and the computer will try to 
POKE them somewhere, resulting in a 
Function Call Error. Using a greater dis- 
tance will remedy this error. 

The variable SC in Line 20 is a scale 
value. This compensates for the screen 
aspect ratio (256 by 1 92 pixels) and your 
TV aspect ratio (approximately 4 to 3). 
This should be changed to fit your TV. To 
do this, type in Listing 3 and run the pro- 
gram. Then measure the width and height 
of the square with a ruler. Use the for- 
mula S V = height/width to find SV. 

When you get tired of the Cabin, try 
some other objects — cubes, pyramids, 
etc. Try rotating two objects around each 
other. Figure 5 is the coordinate list for a 



Line 



Number 




From 






To 




Description 


1 


-44, 


0 , 


14 


55, 


0 , 


15 


Split Between Doors 


2 


55, 


0 , 


15 


60, 


0 , 


10 


Top Center Over Windows 


3 


60, 


0 , 


10 


83, 


0 , 


0 




4 


83, 


0 , 


0 


86, 


0 , 


-3 




5 


86, 


0 , 


-3 


85, 


0 , 


-6 


Nose (center) 


6 


85, 


0 , 


-6 


77, 


0 , 


-10 




7 


77, 


0 , 


-10 


45, 


0 , 


-12 




8 


-44, 


0 , 


14 


-45, 


0 , 


19 




9 


-45, 


0 , 


19 


-82, 


0 , 


-52 




10 


-82, 


0 , 


52 


-92, 


0 , 


52 


Tail 


11 


-92, 


0 , 


52 


-94, 


0 , 


51 




12 


-94, 


0 , 


51 


-80, 


0 , 


22 




13 


-80, 


0 , 


22 


-70, 


0 , 


18 




14 


-68, 


-16, 


-13 


-61, 


-58, 


-9 




15 


-61, 


-58, 


-9 


-54, 


-58, 


-9 




16 


-54, 


-58, 


-9 


-42, 


-56, 


-10 


Right Wing 


17 


-42, 


-56, 


-10 


-13, 


-26, 


-12 




18 


-13, 


-26, 


-12 


47, 


-13, 


-10 




19 


-68, 


16, 


-13 


-61, 


58, 


-9 




20 


-61, 


58, 


-9, 


-54, 


58, 


-9 




21 


-54, 


58, 


-9, 


-42, 


55, 


-10 


Left Wing 


22 


-42, 


55, 


-10 


-13, 


27, 


-12 




23 


-13, 


27, 


-12 


47, 


13, 


-10 




24 


45, 


-13, 


-14 


45, 


-13, 


9 




25 


45, 


-13, 


9 


45, 


-9, 


13 




26 


45, 


-9, 


13 


45, 


-4, 


15 


Front Body Arch 


27 


45, 


-4, 


15 


45, 


4, 


15 




28 


45, 


4, 


15 


45, 


9 


13 




29 


45, 


9, 


13 


45, 


13, 


9 




30 


45, 


13, 


9 


45, 


13, 


-14 




31 


-45, 


-13, 


-14 


-45, 


-13, 


9 




32 


-45, 


-13, 


9 


-45, 


-9, 


13 




33 


-45, 


-9, 


13 


-45, 


-4, 


15 




34 


-45, 


-4, 


15 


-45, 


4, 


15 


Rear Body Arch 


35 


-45, 


4, 


15 


-45, 


9, 


13 




36 


-45, 


9, 


13 


-45, 


13, 


9 




37 


-45, 


13, 


9 


-45, 


13, 


-14 




38 


45, 


13, 


-4 


48, 


13, 


-4 




39 


48, 


13, 


-4 


78, 


7, 


-4 


Left Side of Nose 


40 


78, 


7, 


-4 


85, 


3, 


-4 




41 


85, 


3, 


-4 


86, 


0 , 


-4 




42 


45, 


-13, 


-4 


48, 


-13, 


-4 




43 


48, 


-13, 


-4 


78, 


-7, 


-4 


Right Side of Nose 


44 


78, 


-7, 


-4 


85, 


-3, 


-4 




45 


85, 


-3, 


-4 


86, 


0 , 


-4 




46 


45, 


13, 


-12 


-42, 


13, 


-15 


Left Wing To Body Joint 


47 


-42, 


13, 


-15 


-72, 


13, 


-14 




48 


45, 


-13, 


-12 


-42, 


-13, 


-15 


Right Wing To Body Joint 


49 


-42, 


-13, 


-15 


-72, 


-13, 


-14 




50 


45, 


13, 


-12 


45, 


-13, 


-12 


Front Lower Body 


51 


-72, 


13, 


-14 


-72, 


-13, 


-14 


Rear Lower Body 


52 


-72, 


14, 


-14 


-84, 


14, 


-13 


Left Side Rear Flap 


53 


-84, 


14, 


-13 


-72, 


14, 


-12 




54 


-72, 


-14, 


-14 


-84, 


-14, 


-13 


Right Side Rear Flap 


55 


-84, 


-14, 


-13 


-72, 


-14, 


-12 




56 


-84, 


14, 


-13 


-84, 


-14, 


-13 


Rear Edge Of Flap * more 
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ANNOUNCING 

The VIP Library™ 
With a Terrific Sale! 

Nelson Software Systems is now Softlaw Corporation, under 
new management. Our Super “Color” Library programs have 
also undergone a name change. All programs are the same 
unbeatable Super “Color” Library programs you've heard so 
much about, but with new VIP names. To introduce our VIP 
Library we are having a special sale on the following pages. Our 
low prices for such high quality can't be beat so get started today! 



Official Library of Software for the TANO Dragon 

(Sold for the TANO Dragon only by TANO Microcomputer Products, Corp. and its distributors) 



The Library Concept 

State of the Art, Quality, Integrity, 
Compatibility and Affordability. Five 
things good software must possess. 
Five things that epitomize the VIP 
Library™. Each program is the 
diamond of its class, true excellence. 
These programs are first in features, 
first in power, first in memory, and 
all are affordably priced. And for 
your convenience all disk programs 
can be backed up. 

State Of The Art 

All Library programs are written in 
machine code specifically for the 
Color Computer, to work without 
the interference of a separate 
operating system such as FLEX. From 
this comes speed and more work- 
space for you. Unlike other programs 
for the Color Computer which are 
said to be 64K compatible, VIP 
Library™ programs are not limited to 
between 24 and 30K of workspace in 
64K. Library programs have Memory 
Sense with BANK SWITCHING to 
fully use all 64K, thus giving up to 
51 K with a disk version and up to 
53K with a tape version. 

Easy To Use 

Each Library program was carefully 
designed to be extremely easy to 
use. Built-in on-screen help tables 
are at your fingertips, as are menus 
of all kinds. Every effort is made to 
use logical, intuitive and easy-to- 
remember commands. The manuals 
have been thoughtfully prepared to 
cover every aspect of the program, 
and they have complete tutorials to 
get you going right away. We set the 
standard! 



Lowercase Displays 

State-of-the-Art graphics allow 
instant use of four display colors, and 
eight lowercase displays featuring 
descending lowercase letters. You 
can select from 51, 64 or 85 columns 
by 21 or 24 lines per screen, with 
wide or narrow characters in the 64 
display. These screens provide a 
pleasant and relaxing way to perform 
your tasks, with as much text on the 



. . PICTURE getting your 
instantaneous investment report 
over the phone, using it in your 
spreadsheet calculation, 
generating a report, and writing 
a memo including that report 
and data from your database with 
your word processor, and all this 
with VIP Library ™ programs 



screen as is possible. Each program is 
easy to learn and a joy to use. We 
take pride in the stringent testing 
done to make these programs per- 
form flawlessly. Every feature, every 
convenience, sleek, simple and 
elegant. 

Total Compatibility 

All Library programs are 
compatible. Transfer and use of files 
between programs is easy and 
carefree. What's better, when you 
have learned one program the others 
will come easy. And every program is 
the best of its kind available. 



The Library Programs 

For your writing needs is the VIP 
Writer™, and its spelling checker, the 
VIP Speller™. For financial planning 
and mathematical calculations you 
can use the VIP Calc™. To manage 
your information and send multiple 
mailings there is the VIP Database™. 
For sending all these files to and 
from home or the office and for 
talking to your friends you can have 
the VIP Terminal™. Finally, to fix 
disks to keep all your Library files in 
good repair we offer the VIP Disk- 
ZAP™. 

Mini Disk Operating System 

The Disk versions each have a Mini 
Disk Operating System which will 
masterfully handle from 1 to 4 drives. 
It offers smooth operation for such 
features as the ability to read a 
directory, display free space on the 
disk, kill files, save and automatically 
verify files, and load, rename and 
append files. Library programs simply 
do not have the limitations of BASIC. 

Professionalism 

The Library comes handsomely 
bound in gold-embossed, padded 
leatherette binders to grace your 
work area with the professionalism it 
deserves. Welcome the VIP Library™ 
into your home and office. 

A description of each of the 
Library programs, with the 
special sale price, is contained 
in the following pages. Please 
indulge! 

©1983 by Softlaw Corporation 





VIP Writer™ 

(Formerly Super “Color” Writer II) 

By Tim Nelson 

RATED TOPS IN RAINBOW, HOT COCO, 

AND COLOR COMPUTER MAGAZINE 
The Official Dragon Microcomputer Word Processorf 

The most powerful and easy-to-use word processor is available in the 
showpiece and workhorse of the Library: The VIP Writer™. Because of its 
undisputed superiority over all Color Computer word processors, it was 
selected by Dragon Data Ltd. of England and TANO in the U.S., to be the 
Official Word Processor for their line of Dragon microcomputers. 

The result of two years of research, the VIP Writer™ offers every 
feature you could desire from a word processor. It is the most 
powerful, fastest, most dependable and most versatile. With the hi-res 
display, workspace and compatibility features built into the Library the 
Writer is also the most usable. 

". . . Nearly every feature and option possible to implement on the 
Color Computer. The design of the program is excellent; the 
programming is flawless . . . Features for the professional, yet it is easy 
enough for newcomers to master . . . Certainly one of the best word 
processors available for any computer . . October 1983 "Rainbow" 

" Word processing with VIP Writer is like driving a high-performance 
vehicle . . . This Ferarri of a package has more features than Telewriter, 
Easywriter (for the IBM PC), or Applewriter/’ October 1983 "Hot CoCo" 
The Writer will work with you and your printer to do things you 
always wanted to do. Every feature of your printer can be put to use, 
every character set, every graphics capability at any baud rate, EVEN 
PROPORTIONAL SPACING. All this with simplicity and elegance. You 
can even automatically print multiple copies. 

Although all versions feature tape save and load, the disk version 
provides the Mini Disk Operating System common to the whole 
Library, plus disk file linking for continous printing. 

Professional features of particular note: 

■ Memory-Sense with BANK SWITCHING to fully utilize 64K, giving 
not just 24 or 30K, but up to 61 K of workspace with the rompak version 
and 50K with the disk version. 

■ TRUE FORMAT WINDOW allowing you to previewthe printed page 
ON THE SCREEN BEFORE PRINTING,showing centered lines, headers, 
FOOTNOTES, page breaks, page numbers, & margins in line lengths of 
up to 240 characters. It makes HYPHENATION a snap. 

■ A TRUE EDITING WINDOW in all 9 display modes for those extra 
wide reports and graphs (up to 240 columns!). 

■ FREEDOM to imbed any number of PRINTER CONTROL CODES 
anywhere, EVEN WITHIN JUSTIFIED TEXT. 

■ Full 4-way cursor control, sophisticated edit commands, the ability 
to edit any BASIC program or ASCII textfile, SEVEN DELETE 
FUNCTIONS, LINE INSERT, LOCATE AND CHANGE, wild card locate, 
up to TEN SIMULTANEOUS block manipulations, word wrap around, 
programmable tabs, display memory used and left, non-breakable 
space, and headers, footers and FOOTNOTES. 

■ Automatic justification, automatic pagination, automatic centering, 
automatic flush right, underlining, superscripts, subscripts, pause 
print, single-sheet pause, and print comments. 

■ Type-ahead, typamatic key repeat and key beep for the pros, ERROR 
DETECTION and UNDO MISTAKE features, 3 PROGRAMMABLE func- 
tions, auto column creation, and an instant on-screen HELP TABLE. 

32K (Comes with tape & disk) $59.95 

fSold as the Dragon Writer™ ONLY by Dragon Data Ltd. and its distributors. 



_VIP Speller™ 

A BRAND NEW SPELLING CHECKER! 

^ ^ By Bill Argyros 

Spelling checkers are an invaluable aid to every writer. Habitual 
misspellings and typos can be found without the eyestrain, boredom 
and fatigue associated with endless proofreading. The VIP Speller™ is a 
fast, machine-code proofreading program to correct any VIP Library™ 
file. It automatically proofreads your documents against a 30,000 word 
stock dictionary, plus a dictionary you can create, and corrects typos or 
marks them for special attention. Unlike other spelling checkers, the 
new VIP Speller distinguishes between upper and lowercase letters, 
and it shows the misspelled word in context so you can be sure of your 
correction. Compatible with all CoCo word processors. 

32K DISK ONLY $39.95 

Lowercase displays not available with this program. 




VIP Calc™ 

(Formerly Super “Color” Calc) 

TRUE VISICALC™ POWER! 

By Kevin Herrboldt 

* UP TO 5 TIMES THE SCREEN DISPLAY AREA OF OTHER 
SPREADSHEETS! 

* STATE OF THE ART LOWERCASE DISPLAYS 

* MEMORY SENSE WITH BANK SWITCHING FOR UP TO 40+K in 64K! 

* EXCLUSIVE VIDEO DISPLAY WINDOWS — EVEN UP TO 16! 

* USER-DEFINABLE WORKSHEET — UP TO 512 COLUMNS BY 
1024 ROWS 

* WORKS WITH ANY PRINTER, EVEN LETTER QUALITY! 

* LOCATE COMMAND TO FIND SPECIFIC NUMBERS, LABELS OR 
FORMULAS 

* SORT COMMAND FOR EASY RANKING OF RESULTS 

* ALMOST UNLIMITED PROGRAMMABLE FUNCTIONS 

VIP Calc™ is truly the finest and easily the most powerful electronic 
worksheet and financial modeling program available for the Color 
Computer. Now every Color Computer owner has access to a 
calculating and planning tool better than VisiCalc™, containing all its 
features and commands and then some, WITH USABLE DISPLAYS. Use 
Visicalc templates with VIP Calc™! 

There's nothing left out of VIP Calc™. Every feature you've come to 
rely on with VisiCalc™ is there, and then some. You get up to 5 TIMES 
the screen display area of other spreadsheets for the Color Computer 
and Memory-Sense with BANK SWITCHING to give not just 24, or 30, 
but UP TO 61 K OF WORKSPACE IN 64K!!! This display and memory 
allow you the FULL SIZE, USABLE WORKSHEETS you require. You also 
get: User definable worksheet size, up to 512 columns by 1024 rows! * 
Up to SIXTEEN VIDEO DISPLAY WINDOWS to compare and contrast 
results of changes * 15 DIGIT PRECISION * Sine, Cosine and other 
trigonometric functions. Averaging, Exponents, Algebraic functions, 
and BASE 2, 8, 10 or 16 entry * Column and Row, Ascending and 
Descending SORTS for comparison of results * LOCATE FORMULAS 
OR TITLES IN CELLS * Easy entry, replication and block moving of 
frames * Global or Local column width control up to 78 characters 
width per cell * Create titles of up to 255 characters per cell * Limitless 
programmable functions * Typamatic Key Repeat * Key Beep * 
Typeahead * Print up to 255 column worksheet * Prints atany baud rate 
from 110 to 9600 * Print formats savable along with worksheet * Enter 
PRINTER CONTROL CODES for customized printing with letter quality 
or dot matrix printer * Combine spreadsheet tables with VIP Writer™ 
documents to create ledgers, projections, statistical and financial 
reports and budgets. 

Both versions feature Tape save and load, but the disk version also 
has the Mini Disk Operating System of the entire Library. 

32K (Comes with tape & disk) $59.95 

does not allow hi-res diplay in 32K 




NEW SALE PRICES! 

Check These Library Features: 

■ Fully CoCo 2 Compatible 

■ Nine Display Formats: 32 by 16 
51, 64, 85 by 21 or 24 

■ True Lowercase & Descenders 

■ Four Different Display Colors 

■ 32 & 64K Compatible 

■ Memory Sense - Bank Switching 

■ Up to 51K Disk, 53K Tape 

■ Mini Disk Operating System 

■ Compatible With All Printers 

A SPECIAL OFFER ON THE 
WHOLE LIBRARY — 

The entire Library, all six great disk 
programs, can be purchased for only $300! 



VIP Terminal™ 

(Formerly Super “Color" Terminal) 

RATED BEST IN JANUARY 1984 “RAINBOW” 

By Dan Nelson 

From your home or office you can join the communication 
revolution. The VIP Terminal™ opens the world to you. You can 
monitor your investments with the Dow Jones Information Service, or 
broaden your horizons with The Source or CompuServe, bulletin 
boards, other computers, even the mainframe at work. 



For your important communication needs you've got to go 
beyond software that only lets you chat. You need a smart terminal so 
that you can send and receive programs, messages, even other VIP 
Library files. VIP Terminal, the official Dragon microcomputer 
terminal, does much more than any other terminal and does it reliably. 
None can compare ini features. 

FEATURES: Choice of 8 hi-res lowercase diplays * Memory-Sense with 
BANK SWITCHING for full use of workspace * Selectively print data at 
baud rates from 110 ,to 9600 * Full 128 character ASCII keyboard * 
Automatic graphic mode * Word mode (word wrap) for unbroken 
words * Send and receive Library files, Machine Language & BASIC 
programs * Set comrrjunications baud rate from 110 to 9600, Duplex: 
Half/Full/Echo, Word length: 7 or 8, Parity: Odd/Even or None, Stop 
Bits: 1-9 * Local linefeeds to screen* Save and load ASCII files. Machine 
Code & BASIC programs * Lowercase masking * 10 Keystroke 
Multiplier (MACRO) buffers to perform repetitive pre-entry log-on 
tasks and send short messages * Programmable prompt or delay for 
send next line * Selectable character trapping * Send up to ten short 
messages (KSMs), each up to 255 characters long, automatically, to save 
money when calling long distance. 

All versions allow tape load and save of files and KSMs, but the disk 
version also has the Mini Disk Operating System common to the 

Library. 

32K (Comes with tape & disk) $49.95 

16K Rompak (While they last) $49.95 

(Tape does not allow hi-res displays in 16K) 




9072 Lyndale Avenue So. 612/881-2777 



Minneapolis, Minnesota 55420 U. S. A. 



TRS-80 is a trademark of Tandy Corp. VisiCalc is a trademark of VisiCorp. 



AUTHOR’S SUBMISSIONS 
ARE ENCOURAGED. 



VIP Database™ 

(Formerly Super “Color" Database) 

INCLUDES MAIL MERGE CAPABILITIES TOO! 

By Tim Nelson 

This high speed MACHINE LANGUAGE program fills all your 
information management needs, be they for your business or home. 
And it does so better than any other database program for the Color 
Computer, featuring machine code, lowercase screens and mailmerge 
capabilities. Inventory, accounts, mailing lists, family histories, you 
name it, the VIP Database™ will keep track of all your data, and it will 
merge VIP Writer™ files. 

The VIP Database™ features the Library Memory Sense with BANK 
SWITCHING and selectable lowercase displays for maximum utility. It 
will handle as many recordsas fit on your disk ordisks. It isstructured in 
a simple and easy to understand menu system with full prompting for 
easy operation. Your data is stored in records of your own design. All 
files are fully indexed for speed and efficiency. Full sort of records is 
provided for easy listing of names, figures, addresses, etc., in ascending 
or descending alphabetic or numeric order. Records can be searched 
for specific entries, using multiple search criteria. With database form 
merge you may also combine files, sort and print mailing lists, print 
“boiler plate" documents, address envelopes - the list is endless. The 
math package even performs arithmetic operations and updates other 
fields. Create files compatible with the VIP Writer™and VIP Terminal™. 
Unlimited print format and report generation with the ability to imbed 
control codes for use with all printers. 

As with all other Library programs, the Database features the 
powerful Mini Disk Operating System. 

32K DISK $59.95 

64K Required for math package. 



VIP Disk-ZAP™ 

(Formerly Super “Color" Disk-ZAP) 

RAVED ABOUT IN THE APRIL 1983 “RAINBOW!” 

By Tim Nelson 

Your database file disk, form letter disk, or BASIC program disk 
goes bad. An I/O error stops loading, or even backing up of the disk. 
Weeks, even months of work sit on the disk, irretrievable. Now 
catastrophic disk errors are repairable, quickly and with confidence, 
using the VIP Disk-ZAP™. It is the ultimate repair utility for simple and 
quick repair of all disk errors. Designed with the non-programmer in 
mind, the VIP Disk-ZAP™ will let you retrieve all types of bashed files, 
BASIC and Machine Code programs. 

This high-speed machine code disk utility has a special dual cursor 
screen display to look at the data on your disk. You are able to: Verify or 
modify disk sectors at will * Type right onto the disk to change 
unwanted program names or prompts * Send sector contents to the 
printer * Search the entire disk for any grouping of characters * Copy 
sectors * Backup tracks or entire disks * Repair directory tracks and 
smashed disks * Full prompting to help you every step of the way * 50- 
plus page Operators Manual which teaches disk structure and repair. 

16K DISK $39.95 

Lowercase displays not available with this program. 

& Enter 59 on TeleResponse page 159 

For Orders ONLY [4 
— Call Toll Free — 

1 - 800 - 328-2737 

Order Status and Software Support call (612) 881-2777 

Available at Dealers everywhere. 

If your Dealer is out of stock ORDER DIRECT! 

In Canada distributed by Kelly Software Distributors, LTD. 
MAIL ORDERS: $3.00 U.S. Shipping ($5.00 CANADA; $10.00 OVER- 
SEAS). Personal checks allow 3 weeks. 

All Disk Programs are also available on 3" Diskettes for the 
Amdek Color AMDISK-III Micro-Floppy Disk System for an 
additional $3.00 each. ©1983 by Softlaw Corporation 






Space Shuttle. It takes some time to com- 
pute, but it's worth it. 

I left the rotational math out of this ar- 
ticle because there are many books and 
articles already describing it in detail. 
(See the References at the end of this ar- 
ticle). The formulas used in this program 
came from Microcomputer Graphics by 
Roy E. Meyers. ■ ■ ■ 

+ Programs 



References 



Roy E. Meyers, Microcomput- 
er Graphics, Addison-Wesley 
Micro Books. A very good refer- 
ence on all types of graphics 
written for the Apple but easy 
to convert to TRS-80C . 

Franklin C. Crow, "Three Di- 
mensional Computer Graph- 
ics," Byte, March 1981 . 

Helpful background material 
and three-dimensional rota- 
tion. 

John Ennis, "Rotational 
Grafx," TRS-80 Microcomputer 
News, June, 1982. 

16K program somewhat like 
this one. 

Roy Green, "Is a Rose in Color 
Still a Rose?," 80 Micro, March, 
1982. 

16K program to rotate an ob- 
ject. 



Variable List 



Line 










Number 




From 






57 


-72, 


16, 


-12 


-70, 


58 


-70, 


14, 


4 


-69, 


59 


-69, 


2, 


16 


-69, 


60 


-69, 


-2, 


16 


-70, 


61 


-70, 


-15, 


4 


-72, 


62 


-56, 


57, 


-9 


-56, 


63 


-56, 


-57, 


-9 


-56, 


64 


-93, 


o, 


48 


-87, 


65 


-87, 


0 , 


48 


-70, 


66 


-70, 


0 , 


23 


-80, 


67 


-69, 


15, 


4 


-69, 


68 


-69, 


18, 


12 


-69, 


69 


-69, 


10 , 


20 


-69, 


70 


-69, 


-15, 


4 


-69, 


71 


-69, 


-19, 


12 


-69, 


72 


-69, 


-11, 


20 


-69, 


73 


-69, 


15, 


4 


-44, 


74 


-69, 


2, 


16 


-44, 


75 


-69, 


18, 


12 


-52, 


76 


-69, 


10 , 


20 


-52, 


77 


-52, 


18, 


13 


-52, 


78 


-52, 


18, 


13 


-44, 


79 


-52, 


10 , 


21 


-44, 


80 


-69, 


-15, 


4 


-44, 


81 


-69, 


-2, 


16 


-44, 


82 


-69, 


-19, 


12 


-52, 


83 


-69, 


-11, 


20 


-52, 


84 


-52, 


-19, 


13 


-52, 


85 


-52, 


-19, 


13 


-44, 


86 


-52, 


-10, 


21 


-44, 


87 


-80, 


0 , 


16 


-81, 


88 


-81, 


3, 


14 


-82, 


89 


82, 


3, 


8 


-83, 


90 


-83, 


0 , 


6 


-82, 


91 


-82, 


-3, 


8 


-81, 


92 


-81, 


-3, 


14 


-80, 


93 


-80, 


0 , 


16 


-69, 


94 


-83, 


0 , 


6 


-70, 


95 


-82, 


3, 


11 


-69, 


96 


-82, 


-3, 


11 


-69, 


97 


-69, 


0 , 


12 


-69, 


98 


-69, 


2, 


8 


-70, 


99 


-70, 


0 , 


4 


-69, 


100 


-69, 


-2, 


8 


-69, 



To 




Description 


14, 


4 




2, 


16 




-2, 


16 


Rear Engine Wall 


-15, 


4 




-16, 


-12 




16, 


-13 


Left Wing Flap 


-16, 


-13 


Right Wing Flap 


o, 


48 




0 , 


23 


Tail Flap 


0 , 


23 




18, 


12 




10 , 


20 


Rear Panel Of Left Engine Pod 


2, 


16 




-19, 


12 




-11, 


20 


Rear Panel Of Right Engine Pod 


-2, 


16 




13, 


5 




2, 


14 




18, 


13 




10 , 


21 


Left Engine Pod 


10 , 


21 




1 3, 


5 




2, 


14 




-13, 


5 




-2, 


14 




-19, 


13 




-10, 


21 


Right Engine Pod 


- 10 , 


21 




-13, 


5 




-2, 


14 




3, 


14 




3, 


8 




0 , 


6 


Rear Opening Of Upper Engine 


-3, 


8 




-3, 


14 




0 , 


16 




0 , 


12 




0 , 


4 


Body Of Upper Engine 


2, 


8 




-2, 


-8 




2, 


8 




0 , 


4 


Nozzle Of Upper Engine 


-2, 


8 




0 , 


12 





A = 1 or 0 (screen page 5 or 1) 

Cl = COS (THETA) 

C2 = COS (PHI) 

CD = Current Data 
CX = Center (X) 

CY = Center (Y) 

D = Distance 

I = Loop Counter 

L = Loop Counter 

LC = Line Count (number of lines) 

PI = PHI From 

P2 = PHI To 

P3 = PHI Difference and Step 
PF$ = Picture File Name 
PH = PHI 

PI = The Value of PI 
PL$ = Notes 



Q = Temporary Variable 
Q$ = Dummy Variable 
R1 = RHO From 
R2 = RHO To 

R3 = RHO Difference and Step 
RH = RHO 

51 = SIN (THETA) 

52 = SIN (PHI) 

SA = Steps Allowed 
SC = Scale 

SP = Start of Permanent Data 
ST = Number of Steps 
SV = Start of Variable Data 
T1 = THETA From 
T2 = THETA To 

T3 = THETA Difference and Step 
TH = THETA 



VP = Variable Poke 

XI = 3D Coordinates (From) 

X2 = 3D Coordinates (To) 

Y1 = 3D Coordinates (From) 
Y2 = 3D Coordinates (To) 

Z1 = 3D Coordinates (From) 
Z2 = 3D Coordinates (To) 

X3 = Calculated Coordinates 
X4 = Calculated Coordinates 
Y3 = Calculated Coordinates 
Y4 = Calculated Coordinates 
Z3 = Calculated Coordinates 
Z4 = Calculated Coordinates 
XA = Line From 
XB = Line To 
YA = Line From 
YB = Line To 
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Line 

Number 

101 


-83, 


From 

8, 


2 


-84, 


To 

13, 


-1 


Description 


102 


-84, 


13, 


-1 


-85, 


13, 


-6 




103 


-85, 


13, 


-6 


-85, 


8, 


-9 


Rear Opening Of Left Engine 


104 


-85, 


8, 


-9 


-85, 


3, 


-6 




105 


-85, 


3, 


-6 


-84, 


3, 


-1 




106 


-84, 


3, 


-1 


-83, 


8, 


2 




107 


-83, 


8, 


2 


-72, 


7, 


-2 




108 


-85, 


8, 


-9 


-73, 


7, 


-9 




109 


-84, 


13, 


-3 


-73, 


10 , 


-5 


Body Of Left Engine 


110 


-84, 


3, 


-3 


-73, 


4, 


-5 




111 


-72, 


7, 


-2 


-73, 


10, 


-5 




112 


-73, 


10 , 


-5 


-73, 


7, 


-9 


Nozzle Of Let Engine 


113 


-73, 


7, 


-9 


-73, 


4, 


-5 




114 


-73, 


4, 


-5 


-72, 


7, 


-2 




115 


-83, 


-8, 


2 


-84, 


-13, 


-1 




116 


-84, 


-13, 


-1 


-85, 


-13, 


-6 




117 


-85, 


-13, 


-6 


-85, 


-8, 


-9 


Rear Opening Of Right Engine 


118 


-85, 


-8, 


-9 


-85, 


-4, 


-6 




119 


-85, 


-4, 


-6 


-84, 


-4, 


-1 




120 


-84, 


-4, 


-1 


-83, 


-8, 


2 




121 


-83, 


-8, 


2 


-72, 


-7, 


-2 




122 


-85, 


-8, 


-9 


-73, 


-7, 


-9 


Body Of Right Engine 


123 


-84, 


-13, 


-3 


-73, 


-10, 


-5 




124 


-84, 


-4, 


-3 


-73, 


-4, 


-5 




125 


-72, 


-7, 


-2 


-73, 


- 10 , 


-5 




126 


-73, 


-10, 


-5 


-73, 


-7, 


-9 


Nozzle Of Right Engine 


127 


-73, 


-7, 


-9 


-73, 


-4, 


-5 




128 


-73, 


-4, 


-5 


-72, 


-7, 


-2 




129 


61 , 


2, 


10 


60, 


5, 


10 




130 


60, 


5, 


10 


57, 


5, 


13 


Window — Forward Left 


131 


57, 


5, 


13 


58, 


3, 


13 




132 


58, 


3, 


13 


61, 


2, 


10 




133 


61, 


-2, 


10 


60, 


-5, 


10 




134 


60, 


-5, 


10 


57, 


-5, 


13 


Window — Forward Right 


135 


57, 


-5, 


13 


58, 


-3, 


13 




136 


58, 


-3, 


13 


61, 


-2, 


10 




137 


60, 


5, 


10 


57, 


9, 


8 




138 


57, 


9, 


8 


55, 


7, 


12 


Window — Middle Left 


139 


55, 


7, 


12 


57, 


5, 


13 




140 


60, 


-5, 


10 


57, 


-9, 


8 




141 


57, 


-9, 


8 


55, 


-7, 


12 


Window — Middle Right 


142 


55, 


-7, 


12 


57, 


-5, 


13 




143 


57, 


9, 


8 


53, 


10 , 


9 




144 


53, 


10 , 


9 


53, 


7, 


12 


Window — Left 


145 


53, 


7, 


12 


55, 


7, 


12 




146 


57, 


-9, 


8 


53, 


-10, 


9 




147 


53, 


-10, 


9 


53, 


-7, 


12 


Window — Right 


148 


53, 


-7, 


12 


55, 


-7, 


12 




149 


45, 


13, 


5 


-45, 


13, 


4 


Left Side Of Body 


150 


45, 


-13, 


5 


-45, 


-13, 


4 


Right Side Of Body 


151 


45, 


13, 


-12 


48, 


13, 


-12 




152 


48, 


13, 


-12 


78, 


6, 


-9 


Lower Left Side Of Nose 


153 


78, 


6, 


-9 


85, 


3, 


-5 




154 


85, 


3, 


-5 


86, 


0 , 


-4 




155 


45, 


-13, 


-12 


48, 


-13, 


-12 




156 


48, 


-13, 


-12 


78, 


-7, 


-9 


Lower Right Side Of Nose 


157 


78, 


-7 


-9 


85, 


-3, 


-5 




158 


85, 


-3 


-5 


86, 


0 , 


-4 




For the first try, 


use a Distance 1 of 1200, 


Angle Around 1 


of 0°, Elevation Angle 1 of 0°, 


Distance 2 of 1200, Angle Around 2 of 90 


°, an Elevation Angle 2 of 90°, and 3 steps. 
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C-05, C-06, C-10, C-12, C-20, C-24, C-32 



From the leading supplier of Computer Cassettes, 
new, longer length C-12’s (6 minutes per side) provide 
the extra few feet needed for some 16K programs. 

BASF-LHD (DPS) world standard tape. 
Premium 5 screw shell with leader. 

Internationally acclaimed. 

Thousands of repeat users. 

Error Free • Money back guarantee. 



> 500 C-12's or C-IO’s — 3 8c each 

■ (w /labels, add 4 <t • Shipping $17 /500 
* 500 Boxes 13C ea • Shipping $10 /500 
(Free Caddy offer does not apply) 




TRACTOR FEED • DIE-CUT 
BLANK CASSETTE LABELS 

WHITE: S3 00/100 $20.00/1000 
COLORED LABELS • Pastels - 
Red, Blue. Green, Yellow, Lavender 
$4.00/100 $30.00/1000 



CASSETTE STORAGE CADDY 

Holds 12 cassettes S2 95 

w/o boxes ^ 

Includes edge labels 
and index card 



FREE 

1 CADDY WITH EVERY 
4 D0Z. CASSETTES PURCHASED 

(does not apply to 500 quantity offer) 




Call: 213/700-0330 'or immediate shipment 

won. iwirvu w ' w on Credit Card Orders 



ORDER 
NOW .. 



t> 



MAIL 
TO . . 



YORK lO 



l tm 9525 Vassar Ave.#C2 
Chatsworth, CA 91311 



ORDER FORM a 



ITEM 


1 DOZEN 


2 DOZEN 


TOTAL 


C-05 


□ 7.00 


. j 1300 




C-06 


□ 7.00 


□ 13 00 




C-10 


□ 7.50 


□ 1400 




1T12 


□ 750 


□ 1400 




C-20 


□ 875 


□ 16 50 




C-24 


□ 900 


□ 1700 




C-32 


□ 1100 


□ 21 00 




Hard Box 


□ 250 


□ 4 00 




White LaDels 


□ 3 00/100 


□ 20 00/1000 




Colored Labels 
Color 


□ 4 00/100 


□ 30 00 1000 




OESCR.PTlON 


PRICE 


QUANTITY 




Storage Caddy 


2 95 


















SUB TOTAL 




Calil residents add sales tax 




Shipping /handling (any quantity — using prices above) 


350 


Outside 48 Continental States — Additional $1 per 
caddy, per doz cassettes or boxes 




TOTAL 





CHECK OR M.O. Charge to 

ENCLOSED □ Credit Card: VISA □ MASTERCARD □ 
□ PLEASE SEND QUANTITY DISCOUNTS 



#C2 

Each cassette 
includes two YORK 10 
labels only Boxes are 
sold separately We 
prefer to ship by UPS 
as being the fastest and 
safest If you need ship- 
ment by Parcel Post, 
check here Q 

NOTE Additional 
charges outside 48 
Continental States 
Shipments to AK. HI. 
and USA possessions 
go by Priority Mail 
Canada & Mexico— 
Airmail; 

All others— Sea Mail. 



Ask about our 
DUPLICATING 
SERVICE 



Card No. Exp. 



Name 



Address 

City State/Zip . 



Signature Phone 

Computer make & model Disk? (y/n) . 



100 FOR X=1 TO 1536 STEP 6 
110 PRINT" FROM X,Y,Z" 

120 INPUT Xl , Y1 , Z 1 : IF Xl=999 THE 
N 190 

130 PRINT "TO X,Y,Z" 

140 INPUT X2 , Y2 , Z 2 

150 GOSUB 9 3 0 : I F E = 1 THEN 110 

160 A(X)=Xl:A(X+l)=Yl:A(X+2)=Zl: 

A(X+3)=X2;A(X+4) =Y2 : A ( X+5 ) =Z 2 

170 PRINT 

180 NEXT X 

190 LC=(X-l)/6 

200 GOTO 50 

210 'EDIT OLD PICTURE 

220 CLS : PRINT "ED IT" 

230 PRINT"CHANGE (1) " :PRINT"DELE 
TE ( 2 ) " : PRINT" ADD ( 3 ) " : PRINT " LIS 
T (4) " :PRINT"EXIT TO MAIN MENU ( 
5)"; 

240 INPUT Q : ON Q GOTO 260,330,44 

0. 520.50 

250 GOTO 220 
260 'CHANGE 

270 PRINT : INPUT "WHICH LINE NUMBE 
R” ; LN : LN=LN*6-5 

280 PRINT : PR I NT A ( LN ) ;A(LN+1) ;A(L 
N+2 ) : PRINTA ( LN+3 ) ;A(LN+4) ;A(LN+5 
) 

290 PRINT : INPUT" FROM X,Y,Z";Xl,Y 

1 , Z 1 : INPUT" TO X , Y , Z " ; X2 , Y2 , Z 2 
300 GOSUB 930 : IF E=1 THEN 290 
310 A ( LN ) =X1 : A ( LN+1 ) =Y1 : A ( LN+2 ) = 
Z 1 : A ( LN+3 ) =X2 : A ( LN+4 ) =Y2 : A ( LN+5 ) 
= Z2 

320 GOTO 210 
330 'DELETE 

340 PRINT : INPUT "WHICH LINE NUMBE 
R TO DELETE" ;LN 
350 LN=LN*6-5 

360 PRINT : PRINTA ( LN ) ;A(LN+1) ;A(L 
N+2) : PRINTA (LN+3) ;A(LN+4) ?A(LN+5 
) 

370 INPUT"DELETE (Y OR N)";QA$ 
380 IF QA$ < > " Y " THEN PRINT : PRINT 
"NOT DELETED" :GOTO 230 
390 PR I NT "WORKING . . . " 

400 FOR X=LN TO LC*6-6 
410 A ( X ) =A ( X+6 ) 

420 NEXT X 

430 LC=LC-1 : GOTO 210 

440 'ADD 

450 LN=LC*6+1 

460 PRINT " COORDINATES TO ADD": IN 
PUT "FROM X,Y,Z" ;X1,Y1,Z1 
470 INPUT"TO X,Y,Z";X2,Y2,Z2 
480 GOSUB 930 : IF E=1 THEN 460 
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490 A(LN)=Xl:A(LN+l)=Yl:A(LN+2)= 
Z 1 : A ( LN+3 ) =X2 : A ( LN+4 ) =Y2 : A( LN+5 ) 
= Z2 

500 LC=LC+1 

510 GOTO 210 

520 'LIST 

530 CLS : A=1 : B=0 

540 FOR X=A TO A+4*6-l STEP 6 

550 B=B+1 

560 PRINTB,A(X) ;A(X+1 ) ;A(X+2) 

57 0 PRINT’"' , A ( X+3 ) ;A(X + 4) ;A(X+5) 

580 IF B=LC THEN 230 
590 PRINT : NEXT X 

600 PRINT : PR I NT "HIT ENTER TO CON 
TINUE" 

610 IF INKEY$=" "THEN 610 

620 A=A+24 

630 PRINT 

640 GOTO 540 

650 'SAVE 

660 CLS : POKE6 5494 , 0 

670 PRINT" WORKING . . . " : POKE16 3 8 4, 

LC 

680 FOR X=1 TO LC*6 
690 POKE163 84+X , A ( X ) +128 
700 NEXT X 

710 PR I NT "DRAWING NAME (8 CHARAC 
TERS OR LESS) " 

720 INPUT DN$ 

730 PRINT"TURN RECORDER TO RECOR 
D AND HIT ENTER" 

740 INPUT Q$ :PRINT" SAVING . . . " 

750 CSAVEM DN$ , 16384 , 16384+LC*6+ 
1,350 

760 PRINT "DONE -TURN RECORDER OFF 

»» 

770 PLAY"T20CDEFG" 

780 INPUT"READY" ;Q$ 

790 GOTO 50 
800 'LOAD 

810 CLS : POKE6 5494 , 0 

820 INPUT" DRAWING NAME " ; DN$ 

830 INPUT"TURN RECORDER TO PLAY 
AND HIT ENTER" ;Q$ : PRINT " LOADIN 

G . . . " 

840 CLOADM DN$ 

850 PRINT "DONE -TURN RECORDER OFF 

n 

860 PLAY"T20CDEFG" 

870 PRINT"WORKING . . . " :LC=PEEK( 16 
384) 

880 FOR X=1 TO LC*6 

890 A(X)=PEEK(16384 + X). -128 

900 NEXT X 

910 INPUT"READY" ;Q$ 




SOFTMART 
FEBRUARY SALES 






all items in stock and ready for immediate shipping 

SALE PRICES GOOD UNTIL MARCH 5. 

COMM UNICATION //ADVENTURE/STRATEGY SPECIAL 

THE COLOR CONNECTION 25.95 CO (3 5.50 CD) (16K) 

CCOMPUTERWARE) 

VIP TERMINAL CSOFTLAW) 43.95 CO & CD) C16K) 

COLORCOM/E CEIGEN) 44.95 CR) 

HYPERZONE CCOMPUTERWARE) 23.95 CO / 26.95 CD) C32K) 

POOYAN CDATASOFT) 25.95 CO & CD) C32K) 

CONQUEST OF KZIRGLA CRAINBOW) 18.95 CO Cf6K EXT.) / 

22.25 CD) C32K) 

SCEPTER OF KZIRGLA 14.94 (C) / 16.95 CD) C16K EXT.) 

CRAINBOW) 

BUMPERS CMARK DATA) 22.45 CO / 25. f 5 CD) C32K) 

INSPECTOR CLUESEAU f 7.95 CO / 22.45 CD) C32K EXT.) 

CPETROCCI) 

JOURNEY TO MOUNT DOOM CTOM MIY) 25.15 CD) C32K) 

TIME PATROL CCOMPUTERWARE) 23.95 CC) / 26.95 CD) C32K) 

MANSION OF DOOM CPA L CREATIONS) 1 2.95 CO C32K EXT.) 

SEA QUEST CMARK DATA) 22.50 CC) / 24.95 CD) C32K) 

EL BANDITO CMARK DATA) 22.50 CC) / 24.95 CD) C32K) 

CALIXTO ISLAND CMARK DATA) 16.95 CO C32»0 

ZEUS CAARDVARK) 1 7. 95 CC) / 21 .95 CD) Cl 6K) 

DUNGEONS OF DEATH CAARDVARK) 17.95 CC) / 21. 95 CD) Cl 6K) 

WIZARDS TOWER CAARDVARK) 1 7 . 95 CO / 21.95 CD) C 1 6K) 

INTRO DATA COMMUNICATION 14.95 CC) / 18.95 CD) Cl 6K) 

CCOMPUTERWARE) 

KEYS OF WIZARD ASSOCIATES) 19.95 CC) / 24.95 CD) C32K EXT.) 

C SPECTRAL ASSOCIATES) 

EL DIABLERO CCOMPUTERWARE) 17.25 CC) C16K) / 

20.50 CD) C32K) 

FIRECOPTER CADVENTURE INTL) 2 f . 95 CO C16K) 

ISLE OF FORTUNE CPAL CREATIONS) f 7.95 CO C32K EXT.) 

AIRLINE CADVENTURE INTL) 2 1. 95 CO C16K) 

FEMBOTS REVENGE CCOLORQUEST) 26.95 CC) Cl 6K) / 

26.95 CD) C32K) 

STELLAR SEARCH COWL-WARE) 24.95 CC) / 24.95 CD) C32K) 

SHENANIGANS CMARK DATA) 22.50 CC) / 24.95 CD) C32K) 

AND MORE 

Become a Preferred Customer of SOFTMART and Receive: 

• Free Monthly Sales Sheet 

• Descriptive Catalog with Over 2000 Programs for CoCo 

• 48 Hour in Stock Shipping 

• 30 Day Money Back Guarantee 
GUser’s Group Purchasing Program 
G Acceptance of Checks with No Delay in Mailing 
G Open Door Policy on Additions to Our Product Line 
G New BBS Line 

PLACE AN ORDER FROM THIS AD OR SEND US YOUR NAME 
AND ADDRESS AND WE WILL SEND YOUR 
FEBRUARY SALES SHEET AND OUR 

FREE CATALOG 

Mall Orders: Send Check or M.O. VISA & MC Welcomed. 

P&H $ 2.00 Ground $4.00 Air. 

NC Res. Add 4% Sales Tax. COD Orders $ 2.00 Extra. 

SOFTMART 

2626 Masonboro Ct. 
Raleigh, NC 27604 
C919) 872-7710 



\ 
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TALKING PROGRAMS 

TALKING FINAL COUNTDOWN 

(by Bill Cook) 

Now speech has been added to the excitement of this 
superb adventure. You must stop the mad general from 
launching a missile at Moscow and causing WWIII. Has mul- 
tiple voices for added realism. 



For 32K EXT $24.95 

Standard cassette 

FINAL COUNTDOWN $14.95 



SPELL-A-TRON 

This educational program will assist in teaching children 
how to spell. The program allows the user to build a diction- 
ary of words, with proper pronunciation as well as spelling, 
and then the test mode can be entered for use by the child. 
The program will both spell the word and say the word if the 
child is not correct. Uses only positive reinforcement, and is 
very user friendly. For ANY age child or adult. With docu- 
mentation. 32K EXT $28.95 

TALKING SCORE E-Z 

An excellent adaptation of yahtzee type program with the 
addition of speech. Up to six players can compete at a time, 
and all scoring and record keeping is done by the computer. 
Requires the Spectrum Speaker, and 32K ext. basic. Let 
your computer talk to you for a change. 



On cassette for only $24. 95 

Standard SCORE E-Z $15.95 



All JARB Software talking programs require the 
Spectrum Speaker to work. Look for more talking 
programs to come. 

HARDWARE 

MONITORS 

BMC MEDIUM.RES 



12” Green Screen $ 89.95 

13” color w/sound $303.95 

COMREX HI-RES 

12” Green Screen 164.95 

12” Yellow Screen 169.95 

12” Amber Screen 174.95 



VIDEO PLUS 

(by Computerware) 

This unit will allow you to bring the composite video signal out of the 
computer to any monitor, color or monochrome. Sound output is 
also provided. No soldering or holes to cut. Easy installation instruc- 
tions are provided $24.95 

MEMORY UPGRADE KITS, PRINTERS, ETC. 
CALL FOR PRICES 

We carry products from many manufacturers. 

If you don’t see it, ask. 



JARB 

1636 D Avenue, Suite C • National City, CA 92050 
BBS (619) 474-8981 • VOICE (619) 474-8982 

U.S. FUNDS ONLY • C.O.D. ORDERS ACCEPTED 
NO CREDIT CARD ORDERS 

SHIPPING AND HANDLING: Unless otherwise specified, all 
orders $3.00 per order. California Residents add 6% sales tax. 



SOFTWARE 

HARDWARE 



920 GOTO 50 

930 E=0 : IF XK-128 OR XI >127 OR 
YK-128 OR Yl>127 OR ZK-128 OR 
Zl>127 OR X2<-128 OR X2>127 OR Y 
2<-128 OR Y2>127 OR Z2C-128 OR Z 
2>127 THEN PRINT" ERROR-MUST BE I 
N THE RANGE OF -128 TO 127" : E= 
1 

940 RETURN ■■■ 



Program Listing 2. Rotating Display 



10 CLEAR10 ,16383 :PCLEAR8 '3D ROT 
ATING DISPLAY by Dale A. Keller 
20 SP=16385:SV=17921:SC=1.09:PL$ 
="T20CDEFG" 

30 '1536 BYTES FOR PERM DATA, 148 
47 BYTES FOR TEMP DATA 
40 'LOAD 

50 CLS : PR I NT "LOADER" : PRINT : INPUT 
"PICTURE FILENAME" ;PF$ 

60 INPUT"SET RECORDER TO PLAY. 
THEN HIT ENTER. " ;Q$ : PRINT " LOADIN 

G . . . " 

70 POKE6 5494 , 0 : CLOADM PF$:LC=PEE 
K(SP-l) 

80 PRINT " LOADED-TURN RECORDER OF 
F" : POKE65495 , 0 : PLAYPL$ 

90 SA=INT( ( 3 276 8-SV) /4/LC ) :PRINT 
: PRINT "YOU MAY HAVE UP TO"SA" ST 
EPS" 

100 INPUT"READY (HIT ENTER) ";Q$ 

110 'INPUT COORDINATES 

120 CLS : INPUT "DISTANCE 1, ANGLE 

AROUND 1, ANGLE ELEVATION 1" 

;R1,T1,P1 

130 PRINT: INPUT"DISTANCE 2, ANGL 
E AROUND 2, ANGLE ELEVATION 

2" ;R2,T2,P2 

140 PI=3.1416:T1=T1*PI/180:P1=P1 
*PI/180:T2=T2*PI/180 :P2=P2*PI/18 
0 

150 PRINT: INPUT"NUMBER OF STEPS" 
; ST : IFST>SA THENPRINT" YOU MAY ON 
LY HAVE " ; SA ; " STEPS " : GOTOl 5 0 : ELS 
EPRINT : PRINT " CALCULATING . . . ” 

160 'CALCULATE 

170 R3= ( R2-R1 ) / ( ST-1 ) :T3=(T2-T1) 
/(ST-1) :P3=(P2-P1)/(ST-1) 

180 CX=128 : CY=96 :D=1000:RH=R1: TH 
=T1 : PH=P1 : VP=SV 
190 FOR 1=1 TO ST 
200 S1=SIN(TH) :C1=C0S(TH) :S2=SIN 
(PH) : C2=COS ( PH ) 
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210 FORL=SP TO SP+ ( LC*6-1 ) STEP 6 
220 Xl=PEEK(L)-128:Yl=PEEK(L+l)- 
128 :Zl=PEEK(L+2)-128:X2=PEEK(L+3 
)-128:Y2=PEEK(L+4)-128:Z2=PEEK(L 
+5 ) -128 

230 X3=-X1*S1+Y1*C1:Y3=-X1*C1*C2 
-Yl*Sl*C2+Zl*S2 :Z3=-X1*S2*C1-Y1* 
S2*S1-Z1*C2+RH 

240 X4=-X2*S1+Y2*C1 : Y4=-X2*C1*C2 
-Y2*S1*C2+Z2*S2 : Z 4=-X2*S2*Cl-Y2* 
S2*S1-Z2*C2+RH 

250 XA=SC* ( D*X3/Z3+CX ) :YA=CY-D*Y 
3/Z3 

260 XB=SC* ( D*X4/Z 4+CX ) :YB=CY-D*Y 
4/Z4 

270 XA=INT(XA) :YA=INT(YA) 

280 XB=INT(XB) :YB=INT(YB) 

290 POKE VP , XA : POKE VP+1 , YA : POKE 
VP+ 2 , XB : POKE VP+3,YB 
300 VP=VP+4 : NEXT L 
310 RH=RH+R3:TH=TH+T3:PH=PH+P3 
320 NEXT I 
330 'DRAW SCREENS 
340 PLAYPL$ 

350 PRINT : PRINT : INPUT" HIT ENTER 
TO DISPLAY", *Q$ 

360 PMODE4 , 5 : PCLS : PMODE4 , 1 : PCLS : 

A=0 : CD=SV 

370 FOR 1=1 TO ST 

380 FOR L=1 TO LC 

390 XA=PEEK(CD) : YA=PEEK ( CD+1 ) : XB 

=PEEK ( CD+2 ) : YB=PEEK ( CD+3 ) 

400 LINE ( XA , YA ) - ( XB , YB ) ,PSET 
410 CD=CD+4 : NEXT L 
420 SCREEN1 , 0 

430 IF A=1 THEN A=0 ELSE A=1 
440 IF A=1 THEN PMODE 4,5:PCLS:E 
LSE PMODE 4,1: PCLS 
450 NEXT I 

460 IFINKEY$=" "THEN460 
470 PRINT : PR I NT "SAME RUN AGAIN ( 
1 ) , " : INPUT"SAME OBJECT, NEW ROTA 
TION (2), NEW OBJECT (3)";Q:ON 
Q GOTO330 ,120,40 ■■■ 



Program Listing 3. Scale Adjust 



5 'SCALE ADJUST 

10 PMODE 4,1: PCLS: SCREEN 1,1 
20 LINE(50,50)-(150,150) ,PSET,B 
30 GOTO 30 ■■ 




BRINGS PRICES DOWN 
TO EARTH! 




LOWER-CASE BOARD 
for the COLOR COMPUTER 

Introductory Price $59.95 

Call us for more information! 



THE INTRONICS EPROM PROGRAMMER 

Newly designed unit enclosed in molded plas- 
tic case $140.00 

• Plugs into ROM pack slot. Uses tape base software 
(option of on board ROM). 

• No personality modules required. 

• No switches to fiddle with. 

• Will program 2500, 2700, and 68700 series EPROM. 

• High quality zero insertion force EPROM socket. 

• Gold plated contact (Text Tool™). 




64K COLOR 




POWER-ON L.E.D KIT . 


$ 6 


COMPUTER II 


. $299 


FRONT RESET SWITCH 




DRIVE 0 FOR COCO 




KIT 


$ 7 


40 TRACK 


. $329 


BBS SOFTWARE 




DRIVE 1 FOR COCO . 


. $229 


FOR COCO 


$115 


DISK CONTROLLER 




LIBRARY CASE 




FOR COCO 


. $139 


(HOLDS 60 DISKS) 


$ 23 


EXTENDED BASIC ROM $ 84 


NEW MULTI-COLOR 




SATURN RS-232 




RAINBOW DISKS 


$ 25 


EXPANDER 


. $ 30 


ELEPHANT DISKS SSDD $ 23 


GEMINI 10X PRINTER 


. $290 


8 PRIME 64K 




HAYES SMART MODEM $199 


RAM CHIPS 


$ 50 



UPGRADE YOUR COLOR COMPUTER TO 64K 
WHILE YOU WAIT ! 

Every item sold by us is guaranteed for one year. 
No questions asked. 



Saturn Electronics Inc. 

62 Commerce Dr., Farmingdale, NY 11735 

(516)249-3388 



V 



VISITORS WELCOME • DEALER INQUIRIES INVITED 

Add 4% shipping, minimum $2. per order. VISA, MC 
please add 3V2%. 

Text Tool is a trademark of 3M. 



J 
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I have a 32K cassette-based Ex- 
tended Color Basic computer. In 
many magazines I've seen machine 
language program listings, but I 
don't know how to type them in. Do 
I need Radio Shack's Editor/Assem- 
bler cartridge to do this? If not, what 
do I need? 

— J.M., Holt Summit, MO 

You need an editor/assembler, not 
necessarily the Radio Shack cartridge or 
disk. The editor/assembler combination 
lets you type mnemonic assembly lan- 
guage listings into your computer's 
memory, edit them to your satisfaction, 
then assemble the listings into machine 
code instructions understood by the 
CPU. 

The mnemonics used for assembly lan- 
guage are two and three letter codes 
that are easier for an assembly language 
programmer to remember and use than 
the machine code used by the computer. 
For example, the machine code ooh tells 
the computer to do nothing, the mne- 
monic for that code is nop, for No Opera- 
tion. Other mnemonics are used to tell 
the CPU to increment the amount in the 
A register, or B register, or M memory lo- 
cation. Remembering the mnemonic inc 
m (increment the value in memory loca- 
tion M) is easier than remembering 
7Cxxxx, where xxxx is the memory loca- 
tion. There are literally hundreds of 6809 
instructions, some of which can be as 
long as five bytes. 

You usually have editor/assembler op- 
tions available that let you list the fin- 
ished assembly to tape, video, printer, or 
(if you have it) to disk. 

There are several editor/assemblers on 
the market including: Macro 80-C (disk, 
$99.95) and SDS80C (ROMpak, $89.95), 
both from The Micro Works (P.O. Box 
1110, Del Mar, CA, 92014, (619)942- 
2400); and Co-Res9 from Cer-Comp 
(5566 Ricochet Ave., Las Vegas, Nevada, 



89110, (702)452-0632, tape, $29.95, 
disk, $49.94). Keep an eye on ads and re- 
views. 

Another method is to buy a machine 
language monitor. Most monitors will let 
you put machine code directly into mem- 
ory. The disadvantage is that you have to 
work directly with the machine code, 
which is confusing. Mistakes can often re- 
sult in the loss of the program in memory. 



I have a 32K Extended Color Com- 
puter. Is there any way to interface a 
Radio Shack 600 baud modem with 
the DMP-1 20 printer? 

— S.S., Johnstown, PA 

The DMP-1 20 is a parallel and serial 
port printer, and the Radio Shack Color 
Computer has only an RS-232 printer 
port. To connect the computer to the 
printer, use the four-pin DIN cable sold 
by Radio Shack (#326-3020, $5.95). To 
connect the modem to the printer, buy 
the Radio Shack Color Computer four- 
pin DIN to DB25 RS-232 cable (#26- 
3014, $19.95). This cable can't be used 
directly, it must be modified first. The 
Color Computer RS-232 cable uses a dif- 
ferent pin assignment than the Color 
Computer Printer cable, and you have to 
fix this before the cable will work. 

Take apart the DB25 hood and use a 
pair of pliers to pull the pin from hole 3 
and put it in hole 20. Remove the pin 
from hole 2 and put it in hole 3. This 
should give you a usable cable. 

By the way, why do you want to con- 
nect the printer to your modem? Why 
not let the computer do the communi- 
cating? 



I am an avid adventure game player. 
Where can I get material that will 
help me write my own games? 

— J.F., Shreveport, LA 



You have two choices: the first is The 
Captain 80 Book of BASIC Adventure, 
available from The Programmer's Guild 
(P.O. Box 66, Peterborough, NH, 03458, 
(602)924-6065, $19.95). The book was 
originally written for the TRS-80 Model I, 
but many of the games can be converted 
to run on the Color Computer. This book 
presents several different methods and 
techniques in Basic program creation 
and execution. 

The other book is Writing BASIC Ad- 
ventures for the TRS-80, by Frank 
DaCosta (ISBN:0-8306-1422-2, $9.95). 
Tab books publishes it. The book takes 
you through the theory of writing a Basic 
adventure and uses two adventures to 
demonstrate the principles. The Reader's 
Guide to Microcomputer Books gives the 
book a rating of 95, out of 1 00, based on 
content, quality, and relative merits (the 
other book is unrated). 



Is it possible to connect the voice syn- 
thesizer from Spectrum Projects and 
a disk drive to the Color Computer? 
— J.P., Mentor on the Lake, OH 

You can attach them to the Color 
Computer simultaneously using the new 
Radio Shack Color Computer MultiPak 
Interface (#26-3024, $179.95), the BT- 
2000 from Basic Technology (P.O. Box 
m511, Ortonville, Ml, 48462, (313)627- 
6146, $200), or the C-C Bus from PBJ Inc. 
(P.O. Box 813, N. Bergen, NJ, 07047, 
(201)330-1898, $150); but, you can't 
simultaneously use two ROMpaks. 

These units will let you switch between 
the ROMpaks, so you can load a program 
from disk, switch over to the synthesizer, 
then run the program. When you're fin- 
ished and want to save data to the disk 
drive, switch from the synthesizer to the 
disk controller. If the synthesizer uses 
software built into the ROMpak, you 
won't be able to use it to save or load 
data from the disk drives, because you 
can only have one or the other on line at 
a time. The BT-2000 has slots for five car- 
tridges, the Radio Shack unit has four 
and PBJ'shassix. 



I have an 11 month old 32K Color 
Computer. I use it for business appli- 
cations, and it performs admirably in 
all respects except one — there's a 
lot of interference on the TV screen. 
While under warranty I returned it to 
Radio Shack for service, where it re- 
mained for four weeks. When it was 
returned I could detect no improve- 

| more 
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From Computer Plus to YOU . . . 

PLUS after PLUS after PLUS 





DMP120 $395 
DMP200 $520 



DWP210 $629 



CoCo Drive 0 $329 
CoCo Drivel $235 



BIG SAVINGS ON A FULL COMPLEMENT OF RADIO SHACK COMPUTER PRODUCTS 



COMPUTERS 

Model 4 Portable 
64K w/2 Drives 1525 

Color Computer 

64K ext. basic 305 

Pocket Computer 2 165 

Model 12 1 Drive 2699 

Model 16B IDr 256K 4249 

MODEMS 

Hayes Smartmodem II 235 

R.S. AC-3 129 

R.S. Modem I 89 

R.S. Modem II 160 

PRINTERS 

Silver Reed EXP500 D.W. Ser. 455 
Silver Reed EXP550 D.W. Ser. 665 
CGP115 159 

CGP220 Ink Jet 545 

DMP100 315 

DMP420 735 

Gemini 10X 315 

Delta-10 515 

Gemini 15X 399 

CITOH Prowriter 375 



CITOH Prowriter II 


649 


Okidata 


CALL 


Epson 


CALL 


ETC. 




Disk Drive Controller 


139 


Extended Basic Kit 


69 


Botek Ser/Par Conv. 


69 


64K Ram Chips 


75 


R.S. Deluxe Keyboard 


35.95 


Superpro Keyboard 


69.95 


CCR-81 Recorder 


52 


R.S. Deluxe Joystick (each) 


35.95 


R.S. Joysticks (pair) 


22 


Video Plus (monitor adapter) 


24.95 


Amdek Color 1 + Monitor 


299 


SOFTWARE (Tape Version) 


Zaxxon 


39.95 


The King 


26.95 


Trap Fall 


27.95 


Screen Print 


19.95 


Buzzard Bait 


27.95 


Devil Assault 


27.95 


Colorpede 


29.95 


Juniors Revenge 


28.95 



Pac Attack 24.95 

Block Head 26.95 

Froggie 24.95 

Lunar Rover Patrol 24.95 

Lancer 21.95 

Color Zap 9.95 

Typing Tutor 19.95 

Galagon 24.95 

Scott Adams Adventures 19.95 

Sea Dragon 34.95 

Colorcome 49.95 

Telewriter 64 49.95 

FHL Flex (disk) 69.95 

O-Pak (disk) 34.95 

Key-264K 35.95 

Elite-Calc 59.95 

VIP Writer 59.95 

VIP Calc 59.95 

VIP Terminal 49.95 

VIP Database (disk) 59.95 



Order any 2 software pieces listed 
and take 10% off their listed price. 
All R.S. software 10% off list. 

Send for complete list. 



CALL TOLL FREE 
1 - 800 - 343-8124 



• LOWEST POSSIBLE PRICES 

• BEST POSSIBLE WARRANTY 

• KNOWLEDGEABLE SALES STAFF 

• TIMELY DELIVERY 

• SHOPPING CONVENIENCE 








IN MASSACHUSETTS CALL (617) 486-3193 



TRS-80 is a registered trademark of Tandy Corp. 



S Enter 64 on TeleResponse page 159 






mmmDEFUSR, 



merit. Not wanting to lose it for 
another four weeks, I just put up 
with the problem. Now I want to do 
something about the RFI. 

The interference varies, becoming 
particularly bad when the disk drives 
are in operation. Placing my hand on 
top and applying pressure decreases 
the interference. I've tried new ca- 
bles to the TV and various TV RFI fil- 
ters, all to no avail, do you have any 
suggestions? 

— H.M., Winthrop, M A 

First, check the game box converter on 
the back of the TV for frayed connec- 
tions. If the unit is loose, or has a bad 
connection, you can get the results you 
mention (mine had that problem and I 
had a devil of a time finding it; when I 
did, replacing the box cured my prob- 
lem). Play with the switch box a little and 
see if that changes things. 

Next, early production Color Comput- 
ers did not have grounding clips on the 
cartridge port connector, which created 
a severe RFI problem. If this is the prob- 
lem, detaching the disk drive cartridge 
and powering up in Extended Basic 
should clear up the RFI problem com- 
pletely. If this does cure the problem, you 



need to add the grounding clips to the 
port. Radio Shack should install them for 
a small fee, or you can buy the dips and 
install them yourself. 

Since you say you can reduce the 
amount of RFI by pressing on the top of 
the case, I would suspect the problem 
might be with the RFI shield inside your 
computer. It might not be firmly at- 
tached, or might not be making good 
contact. 

Open up your computer (which will 
void your warranty) and remove the RFI 
shield (the large piece of metal above the 
keyboard). You may have to cut a plastic 
tie ribbon to remove the shield. Next, sol- 
der a wire to the metal wall the RFI shield 
sits on and to the shield itself. This will 
ensure solid electrical contact. Replace 
the shield, reassemble the case, and test 
the computer. Your RF should be gone, 
or greatly reduced. 

If you still have problems, spray the en- 
tire inside of your computer case, top 
and bottom, with metallic paint (after re- 
moving the computer boards, keyboard, 
and mounting hardware). This will form 
an electrical "Faraday cage" which will 
capture any RFI put out by the Color 
Computer. To complete the Faraday cir- 
cuit, put a small bolt through the case 



(you can't solder the wire to the case, the 
plastic would just melt) and ground to it. 
You might also want to try shielding the 
disk drive cables from the TV set. 



Shortly after we bought our com- 
puter, we purchased and installed 
64K chips. When we purchased these 
chips we understood Computerware 
to claim access to the full 64K, only to 
find out in the instructions that the 
procedure for doing that disables the 
ROM and Basic language. 

Some advertisements we've read 
seem to suggest that there's a way to 
store data in RAM in two banks of 
32K without disabling the ROM. 
How is it done? Will it work after the 
32K upgrade which requires cutting 
some capacitors? Will Extended Basic 
be disabled? 

— N.I., Athens, TX 

The solution is not simple. The design 
of the 6809E CPU limits it to addressing 
a maximum of 64K of contiguous mem- 
ory. In a 32K RAM the other 32K of mem- 
ory is occupied by the 1 6K ROM and 1 6K 
cartridge ROM, for a total of 64K. 

To get a 64K RAM system, you have to 



REAL-TIME was never so real... 



We are pleased to announce the 1984 

sColor___ 

Wall Calendar 




Address 



State . 



SEND COUPON TO: The Color Computer Magazine 

1984 CALENDAR 

Highland Mill, Camden, ME 04843 



Please allow 6-8 weeks 
for delivery. 



Yes! 



Please send me 



calendars (I've included 



gifts for my friends) at $8.95 each. 

(Please include S 1 .50 shipping & handling for each calendar ordered.) 



Total amount $_ 



□ Check or money order enclosed 



□ VISA □ MasterCard Exp. Date . 

Account # 

Name 
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switch the 16K ROM and 16K cartridge 
ROM out of place and replace it with 
RAM. The consequences of this, of 
course, is that Basic is no longer avail- 
able. To have both 64K RAM and the 
Basic ROM available would require that 
the CPU address 96K of contiguous 
RAM, which isn't possible. 

The only solution is to use “bank 
switching" (that doesn't mean switching 
to First National). This is a special tech- 
nique that divides the 64K RAM into two 
banks of 32 K, and switches in the appro- 
priate bank when needed. This lets you 
use (sort of) the full 64K RAM with Basic. 

The “sort of" is required because you 
need a machine language monitor in 
control at all times to decide when to 
switch from one bank to another. This is 
complicated by the requirements of the 
Basic operating system. 

When you Run a Basic program, Basic 
stores the variables, in the order it en- 
counters them in your program, in mem- 
ory starting at the top of the 32K RAM 
and growing down towards your pro- 
gram. When you switch memory banks, 
this information is "forgotten" and the 
new memory bank starts from scratch. 
Thus, updating a variable's value in one 
bank doesn't change it in the other. 



There are several possible ways to 
write a supervisor routine. One way 
would store the program in one bank, 
and the variables and graphics screens in 
the other. The routine would transfer the 
Basic program line to be executed to a 
low memory location, select the other 
bank, allow Basic an open line to store 
data and minipulate graphics, and switch 
back to the other bank for the next Basic 
line. This limits you to a maximum pro- 
gram length of about 30K (no 32K be- 
cause the first 2K is used by the Basic op- 
erating system). 

Trying to create a larger program 
would require a more sophisticated bank 
switching routine which would automat- 
ically determine if the line number to be 
fetched is in bank one or bank two, and 
perform the appropriate fetch operation. 
The main difficulty with this routine 
would be trying to save or load the pro- 
gram. The ROM save and load routines 
wouldn't know they were supposed to 
switch banks, and couldn't do it any way, 
so your machine language routine would 
have to be written to take care of this 
chore also. 

A direct answer to your question is: 
Yes, you can use a full 64K RAM com- 
puter with the Basic ROM enabled, but 



you need a special machine language 
driver routine to switch between the two 
32K banks as needed. The simplest 
method would put the program in one 
bank, and the data in the other. The 
method used to get to 64K shouldn't 
matter, unless you have hardwired the 
SAM chip to address the memory in a 
specific way. 

I don't know of any companies cur- 
rently selling such a routine. ■ ■ ■ 



Update 

In the October issue I accidently 
gave Spectrum Projects' name as 
Spectrum Associates. Sorry about 
that, Bob. 

Also, Spectrum Projects (93-15 
86th Drive, Woodhaven, NY 11421, 
(212) 441-2807) sells an ID button 
that says 64K, for all you people 
who've upgraded and are tired of 
having their Color Computer labeled 
4K, 16K or 32K. The button sells for 
$4.99. 



.ware 



No Royalties? 



$19.95 - Tape 

16 K ECB required 



Software that you design 
and sell can be en- 
hanced by using the 
Auto Run loader. Sugar 
Software will allow you 
to do this without 
requesting royalties. 



AUTO Ili, * * 

^37 ^37 

• Generates a machine language loader to preceed 
your program on the tape. 

• Starts up your Basic or ML programs automatically 

• Locate your program anywhere in memory 

• Displays a colorful title screen (which you create 
with the Auto Run graphics editor) while your pro 
gram loads 

• Gives your program that “professional” touch 

• Optional vocal, musical, or “sound effects” 

• Does not take up any memory 

• Used by many top Color Computer software houses 



SUGAR SOFTWARE 
2153 Leah Lane 
Reynoldsburg, Ohio 43068 
(614) 861-0565 






Add $1 .00 per tape (or postage 
and handling, Ohioans add 67s% 
sales tax COO orders are wel- 
come. CIS orders EMAIL to 
70405, 1374. Dealer inquiries in- 
vited. 

A complete catalog of other sweet Sugar Software products is available. 



.ware 



Holy Moses! 

and other bible heroes will 
lead you through our great new 

Bible Stories 



$19.95 - Tape 
$24.95 - Disk 

16 K ECB required. 



Ad^Cnlure 



• A first adventure game for the 
young child and his family 

• Familiar Bible stories 

• High resolution graphics 

• Great sound effects 

• The one adventure game you can 
play over and over again 




SUGAR SOFTWARE 

2153 Leah Lane 
Reynoldsburg, Ohio 43068 
(614) 861-0565 













VISA' 



Add $1.00 per tape for postage 
and handling. Ohioans add 5.5% 

ukM tax COO order* arm wel- 
come. CIS orders EMAIL to 
70405. 1374. Dealer inquiries in- 
vited. 

A complete catalog of other sweet Sugar Software products is available. 
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DSL, COMPUTER PRODUCTS INC. 



INATAK 

Fast arcade action 
Multiple aliens attack. 
Disk or Tape 

$24.95 





GAMES 




DEATH TRAP 


19.95 (D) 


CATERPILLAR 


19.95 (C) 


HAPPY HURDLER 


12.95 (C) 


POLARIS 


29.95 (R) 


SPACE ASSAULT 


29.95 (R) 


SHARK TREASURE 


24.95 (C) 


KEYS OF THE WIZARD 


19.95 (C) 


MUDPIES 


29.95 (C) 


TRAPFALL 


27.95 (C) 


AIR TRAFFIC CONTROLLER 


28.95 (C) 


GRABBER 


27.95 (C) 


SPACE SHUTTLE 


28.95 (C) 


DEVIL ASSAULT 


27.95 (C) 


BUZZARD BAIT 


27.95 (C) 


THE KING 


26.95 (C) 


BLACK SANCTUM 


19.95 (C) 


CALIXTO ISLAND 


19.95 (C) 


EL BANDITO 


24.95 (C) 


GLAXXONS 


24.95 (C) 


ASTRO BLAST 


24.95 (C) 


SHENANIGANS 29.95 (D) 24.95 (C) 


SPACE RAIDERS 


24.95 (C) 


CAVE HUNTER 


24.95 (C) 


STARSHIP CHAMELON 


24.95 (C) 


DOODLEBUG 


24.95 (C) 


STAR BLASTER 


39.95 (R) 


EL D1ABLERO 


24.95 (C) 


STORM 


24.95 (C) 


ROBOTTACK 


24.95 (C) 


THE FROG 30.95 (D) 27.95 (C) 


GALAX ATTAXX 


21.95 (C) 


DEFENSE 


21.95 (C) 


COLORPEDE 


29.95 (C) 


MAZE RACE 


14.95 (C) 


BIRD ATTACK 


21.95 (C) 


ANDROID ATTACK 


21.95 (C) 


COLOR HAYRIDE 


24.95 (C) 


BALLOON ATTACK 29.95 (D) 24.95 (C) 


COLOR DFT 


25.95 (C/D) 


COLOR FURY 


27.95 (C) 


CASHMAN 


27.95 (C) 


OUTHOUSE 


27.95 (C) 


AREX 


34.95 (C) 


ZAXXON 


39.95 (C) 


MOON SHUTTLE 


29.95 (C/D) 


CHOPPER STRIKE 


27.95(C) 


DEMON SEED 


27.95(C) 


TIME BANDIT 


27.95(C) 


ELECeTRON 


24.95(C) 


SR#71 


28.95(C) 


BLOC HEAD 


26.95(C) 


HYPER ZONE 


26.95(C) 


JUNIOR S REVENGE 


28.95(C) 





^KING TUT 



Graphic arcade adventure, 
multiple screens, 
find treasures, outwit 
monsters, discover the 
secrets of Tut. 
Minimus 32K Disk Only 

$29.95 






ULTRA CONTESTER 

Disk and Tape I/O , Auto 
Sort, works In 16, 32, or 
64K computers. 

Over 30,000 calls possible. 
Written by WPX record 
holder AH2E. 

Disk or Tape $39.95 



HARDWARE 

32/64K TDP 100 219.00 

32/64K EXT TDP 309.00 

32/64K CC2 209.00 

32/64K EXT CC2 299.00 

TDP LINE PRINTER I 225.00 

GEMINI STX 80 199.00 

GEMINI 10X 299.00 

GEMINI 15 349.00 

DELUXE JOYSTICKS 39 9S 

STD. JOYSTICKS 10.00 

ATARI JOYSTICKS 14.95 

DISK DRIVE 0 349.00 

DISK DRIVE 1,2. OR 3 249.00 

DUAL HALF HEIGHT 499.00 

MODEM I 99.00 



ACCESSORIES 




NAN09 CARD 


4.95 


EPSON RIBBONS 


7.49 


BLACK. BLUE. RED. BROWN. GREEN 




C-10 DATASETTE 


1.25 


020 DATASETTE 


1.50 


GEMINI RIBBONS 


2.95 


LP VU. DMP 100. TPI RIBBONS 


4.95 


DISK MAILERS 


0.95 


10 PACK 


8.95 


DISK SAVERS 


.59 


12 PACK 


5.95 


DISKS 




SENTENIAL SS/SD 


19.95 


SENTENIAL SS/DD 


22.95 


VERBATIM 


34.95 


DISK DOUBLER 


11.95 


GRAND SLAM 64K KIT 


75.00 


16-32K RAM SLAM 


49.95 


2 WAY RS 232 SWITCHER 


29.95 


3 WAY RS 232 SWITCHER 


39.95 


4 TO 4 PIN CABLE 


4.95 


CASSETTE CABLE 


5.95 


MASTER CONTROL II OVERLAY 


2.50 


64 K RAM BUTTON 


2.95 


BOTEK INTERFACE 


59.95 


FOR EPSON 


69.95 


MD KEYBOARD 


69.95 


MULTI PACKS 




DSL GREATEST HITS 




TAPE 


39.95 


DISK 


49.95 


COLOR LOAD 80 




VOLUME 11 


9.95 


VOLUME III 


9.95 


RAINBOW ON TAPE 


£ CA 


JAN ‘84 


0.3U 


FEB ‘84 


6.50 


MAR ‘84 


6.50 


DSL DISKES IN 




PLASTIC CARRY CASE 


19.95 





APPLICATION 



THE GENERAL 
COLOR PASCAL 



RANDOM BASIC 
DISK MAILER 
TELEWRITER T 
SUPER COLOR WRITER 
TAPE OR DISK 

ELECTRONIC CALLIGRAPHER 
SUPER CONTESTER I 
SUPER CONTESTER II 
COUNTRY LOCATOR 



TAPE 


39.95 


DISK 


49.95 


TAPE 


49.95 


DISK 


69.95 




75.00(D) 




24.95 


49.95 


DISK 59.95 



59.95 

18.95 (D) 

14.95 (C) 

24.95 (C) 

14.95 (C) 



UTILITIES 



JDB DOS 


49.95 


COLOR GRAPHIC EDITOR 


19.95 (C) 


SUPER SCREEN 


29.95 (C) 


GRAPHIC SCREEN PRINT 




EPSON 


9.95 (C) 


OKIDATA 


9.95 (C) 


GEMINI 


9.95 (C) 


PROWRITER 


9.95 (C) 


LP VII/RS 


7.95 (C) 


LOGICAL DISK COPY 


14.95 


EDTASM + 


49.95 (R) 


TAPE DIRECTORY 


14.95 (C) 


TAPE TO DISK 


17.95 (C) 


DISK TO TAPE 


19.95 (C) 
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DSL COMPUTER PRODUCTS INC 

313-582-8930 
313-582-3406 (Data) 

P.O. BOX 1176 



DEARBORN, MI 48121 

Michigan Residents Add 4% Sales Tax to Order. 
Please include $2.00 for S. & H. 




Custom 




Part 7 of The Color Burner. 
Part 2 will appear 
in May. 



T HIS MONTH'S TOPIC is the Color 
burner, a project to program eras- 
able, programmable read-only 
memories (EPROMs). Hear me out for the 
next few paragraphs, and then I'll get 
right to it. 

Moonlight in Vermont 

The moon's been full and the mail's 
been bad. An electrical engineer said his 
computer was damaged by my 64K 
memory upgrade article. Someone else 
told me I should be strung up for show- 
ing a hot cutter made with a razor blade 
and propane torch. Another reader 
thinks I should keep opinions out of my 
columns; only the facts, ma'am. Some 
say there's too much theory, others say 
not enough; some say too much hard- 
ware, some say not enough. 

In publishing, everyone from author to 
printer works hard for perfection. But 
perfection doesn't often happen, be- 
cause of uncaught errors in typography, 
spelling or grammar, or in drawings or 
paste-ups. To avoid potential troubles, 
always read an entire article; there's sel- 
dom any filler. Even what I'm saying here 
has a point, and the point is this: never 
follow instructions by themselves. Expla- 
nations, descriptions, diagrams, instruc- 
tions and summaries are provided for the 
purpose of clarifying and cross-checking. 
If things look inconsistent or if you don't 



by Dennis Kitsz 



fully understand both the theory and the 
directions, you have three options: fig- 
ure out the correct procedure, call or 
write the author for help, or wait at least 
two months for corrections and further 
explanations to be printed. 

Authors, editors and publishers can't 
be responsible for the end results of user 
applications and modifications. Just as 
each and every article can't describe how 
to plug in and use a soldering iron, how 
to open the computer, how to use the 
Basic language, or how to enter an as- 
sembly language listing, each and every 
article can't outline every precaution and 
safeguard to be taken. It remains your re- 
sponsibility to determine whether the ar- 
ticle suits your purpose and skills. 

This isn't a defense; it's only an expla- 
nation. I apologize for the typographical 
errors which crept into my 64K upgrade 
for D-revision computers. Yes, they were 
my errors; I missed them in proofread- 
ing. But like those peculiar logic puzzles 
(Mr. Brown lives in a red house, Mr. Blue 
has an orange cat, Mr. Green likes purple 
pizza. What color car does Mr. White 
drive?), there was enough information in 
the article for a reader to be alerted that 
something was amiss, enough informa- 
tion to say, "Hey, this doesn't make 



sense. " If you could straighten it out, you 
did so; if you couldn't, you wrote or 
waited. 

As do all The Color Computer Maga- 
zine authors, I take my responsibility to 
readers very seriously. I answer as much 
mail as I can, particularly if the reader has 
a problem understanding my explana- 
tions. I make sure my software runs in 
most environments and is legible and 
carefully commented, and that hardware 
has been built and tested on all Color 
Computer versions. Sometimes you 
might scratch your head because a patch 
in a prototype or a Poke in a program 
served as a temporary fix that I forgot to 
include by the time I wrote the article. 

But we authors will come clean; we 
have to admit our errors because my cir- 
culation department tells me I have more 
than 70,000 final proofreaders out 
there. Once an author's proofs go back in 
the mail, we have to live with the article 
as it is; there are no second editions for 
us, no errata sheets to slip under the fly- 
leaf. In fourth grade, I remember the 
humiliation of being made to stand up in 
front of the class for fifteen minutes for 
doing something stupid. When I do 
something stupid in print, I have to stand 
up in front of many thousands of pairs 
of reproachful eyes for two months. So 
please, read the whole article, under- 
stand it, and don't do anything you can't 
undo until you wait for corrections. 

+ more 
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YOUR OWN GURU-WILL 
CARRY ON R DIALOG ON 
ANY SUBJECT-POWERFUL 
DEMONSTRATION! 
INTELLIGENT DIALOG 
WITH fl COMPUTER! GURU 
WILL DISCUSS THE PAST 
THE FUTURE AND EVEN 
HERRS YOUR CONFESSION! 
THE GURU IS ALWAYS THE 
CENTER OF ATTENTION 
AT ANY PARTY! 




O I ET I X I RN 

A COMPLETE DIETETIC PROGRAM- IT CONVERTS 
FOOD INTO CALORIES-KEEPS TRACK OF YOUR 
CALORIE INTAKE, BY 



F? THE MEAL, THE DAY 
E THE WEEK ETC. 

S TELLS HOW MUCH YOU 
M SHOULD WEIGH AND 
• AND HOW MANY 
U CRLORIES YOU NEED 

M ACCORDING TO YOUR HEIGHT, FRAME SIZE, 
I ACTIVITY LEVEL, AGE AND SEX. 

Cl 

u 





0 

R 

1 



[CT I VE 
i A GAME PROGRAMMED 
1 NEVER TO GROW OLD ! ! ! ! I 
IT HRS A NEW CRIME M 

NEW SUSPECTS, NEW SCENE, R 
NEW WEAPON AND NEW 1_ 

CLUES EACH TIME IT IS • 

F! PLAYED ! NEVER THE SAME GAME TWICE! R 

*=» R 

X CRSSETTE *21.93 POST PAID C 16K EXT MIN. > IZ 
X DEALER INQUIRES INVITED I 

v N 

E *: 3*: Xi XT. *r. 3*c *: *: 5*: :*c *: 5*: *: *: *: *: X: G 

• • 

• > 3-* HOUR SHIPPING^ I 

R H 

2 i,iiiiiiiiii!!!iiii!lllill!!!ll!::lllii!iilll!illi. Iititiiiiinillllllllll! 

^ I! NORTHGLENN SOFTWARE COMPANYII^ 

E l1lllllllllllll!tllllllimiiiii!!iiii(iiiiiii<M»***- — I ! 
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BOX 33113 

'j NORTHGLENN, CO 80233 MM 

303 >43 1—0647^™ 
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New! ★ 

Quality Software 
for Ages 3-6 

EARLY LETTER RECOGNITION and 
KIDS’ CHOICE (a number recogni- 
tion game) have been developed 
specifically for pre-schoolers. 
Our “activity center” approach, 
along with outstanding animated 
graphics, introduces the young 
child to the keyboard, software- 
usage skills, and to the realization 
that the TV can be much more than 
merely an electronic pacifier. 

At Software Specialists, we are ex- 
cited about the idea that this will be 
the first generation to grow up relat- 
ing to computers as an integral part 
of everyday life, we offer programs 
that foster early familiarity and 
pleasure with the Color Computer, 
laying the foundation for effective 
and enthusiastic utilization of com- 
puters in grade school and beyond. 

EARLY LETTER RECOGNITION . . $12.95 

KIDS’ CHOICE $12.95 

★ ★Order both programs for $ 19.95 ★ ★ 
(System: I6K minimum, cassette-based) 
Source listings: $2.95 each, modifiable 
(available with cassette order only). 

KIDSYVARE from 
SOFTWARE SPECIALISTS 

P.O. BOX 2029 

★ Princeton, N.J. 08540 ★ 

V ^ 



And Now, Here's Burner 

There's been a lot of interest in EPROM 
programmers among Color Computer 
users, mostly because of the computer's 
ability to use plug-in program-pack car- 
tridges. The EPROM is the perfect device 
for program packs, for three big reasons: 
it's cheap ($3 to $4 for a 2K EPROM, $7 
to $9 for a 4K EPROM, and prices on 8K 
and 16K versions coming down all the 
time); you can program it quickly and 
easily (less than a minute per 1 K of mem- 
ory); and it's re-usable after being erased 
under ultraviolet light. 

Program-pack cartridges are conven- 
ient. They commonly contain machine 
language programs such as utilities or 
games, but they can contain Basic pro- 
grams or just blocks of important, fixed 
data. There are 16,128 bytes available 
for the program-pack to use, making it a 
powerful extension of your Color Com- 
puter's software. 

Another use for EPROMs is to replace 
Basic ROMs with other languages, or 
even to update your Basic ROMs to keep 
up with Radio Shack's changes and up- 
dates. 

The main obstacle to using your own 
EPROMs is usually the fairly infrequent 
need to program one. Unlike software 
utilities, EPROM programmers (also 



called EPROM burners) are seldom used 
often enough to justify their $100 or 
higher cost. If that's your situation, this 
month's Color Burner is for you. For less 
than $1 5 in parts, you can put together 
a software-controlled EPROM program- 
mer which will burn standard 5-volt EP- 
ROMs from 2K to 16K in size (2716 
through 27128). With a simple change 
of software and a differently-wired "per- 
sonality module," Basic ROM compatible 
68764 EPROMs can be programmed. 

How It Works 

A memory device needs an address to 
access information. To read (get infor- 
mation from) any memory, the address 
of one memory cell is presented by the 
processor, together with memory-read 
control signals. The memory responds 
with data. To write to (store information 
in) ordinary read/write memory (RAM), 
an address is presented with memory- 
write control signals; data from the proc- 
essor is stored into that memory cell . 

Reading EPROMs is just this straight- 
forward. But writing to — that is, pro- 
gramming — EPROMs is a special case. 
An address and data are presented to- 
gether to the EPROM, and must be held 
steady (stable); while address and data 
are being held stable, special program- 
ming voltages and control signals are 



Parts List 


Part: 


Quantity 


MC6821 peripheral interface adapter 


2 


7406 hex inverter, 30V open collector* 


1 


2N3906 small-signal PNPtransistor 


3 


2N3904 small-signal NPN transistor 


1 


1N41 48 diode 


4 


1 N525 1 B 22-volt zener diode* 


1 


1 N5254B 27-volt zener diode* 


1 


1 0K ohm 1/4W 5% resistor 


4 


4.7Kohm 1/4W5% resistor 


3 


1 Kohm 1/4W 5% resistor 


1 


100-ohm 1/4W 5% resistor 


1 


1 0 mF 35-volt electrolytic capacitor 


1 


47 mF 35-volt electrolytic capacitor 


1 


0.1 mF 50V monolythic capacitor 


4 


9-volt battery clips 


3 


1 6-pin integrated circuit socket 


1 


40-pin integrated circuit socket 


2 


1 6-pin header (for personality/ 


1 each 


modules) 


1 


28-pin zero-insertion-force socket 
*do not substitute 


Available from Green Mountain Micro, Roxbury, Vermont 05669, (802)485- 


6112: Color Burner assembled and tested, $49.95, including software on cas- 


sette; complete kit of parts, $39.95; printed circuit board, $20 (add $2.50 ship- 


ping and handling). 
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turned on for a very specific period of 
time. After this time, the control signals 
and voltages are turned off, and the next 
address and data are selected . 

The actual programming time for most 
popular EPROMs is 50 milliseconds (mS), 
or roughly 1/20 of a second per cell, mak- 
ing the time per K (1 ,024 bytes) of mem- 
ory about 51 seconds. An 8K EPROM the 
size of the Extended Basic, then, would 
take nearly seven minutes to program in 
its entirety. (A nice thing about EPROMs 
is that they can be programmed one byte 
at a time — program what you need, and 
leave the rest for expansion .) 

The voltages needed for programming 
EPROMs are +5 volts (for power), +25 
volts (for 2K and 4K EPROMs), and +21 
volts (for 8K and larger EPROMs). Certain 
manufacturers also have self-identifica- 
tion information embedded into their 
EPROM that can be read using + 1 1 volts, 
but the Color Burner does not use that 
feature. 



The Color Burner uses three integrated 
circuits — two 6821 peripheral interface 
adapters (PIAs) to hold the address and 
data stable and provide control informa- 
tion, and one 7406 to activate the actual 
control voltages. Four transistors to- 
gether with associated resistors and 
diodes are used by the 7406 to supply 
ground, +5, +21 or +25 volts. A plug-in 
wiring block called a "personality mod- 
ule" routes correct address and voltage 
information to their respective points on 
the EPROM. A zero-insertion-force sock- 
et holds the EPROM itself. Figure 1 is a 
block diagram of the activity, and Figure 
2 is the complete schematic. 

Look at Figure 1 . There are seven mis- 
cellaneous lines running from the com- 
puter to the two PIAs. Address lines A1 
and A0 select the four internal control 
and data registers of the PIA (refer to 
"Custom Color," March and April 1983, 
for details of the operation of the 6821 
PIA). SCS* (Spare Select) decodes the 

+ more 



D0-D7 : 






PORT 



A2 

A1 

AO 

SCS 

E 

R/W 

RES 

D0-D7 



*( 






D0-D7 



PORT A < 



A2 

A1 

AO 

SCS 

E 

R/W 

RES 



PORT B < 



' DO - D7 



AO- A7 ji 



; A8-Aio 



v cc>~ 



i select; 



Figure 7. Block diagram of the 
Color Burner. 



EPROM 

SOCKET 



: aii -A13 illiiiji; 



PERS. 


MODULE 


A11-A13 




vcc 




OE 
r f 




u t. 




PGM 


Vpp 



VOLTAGE 

BLOCK 




ARCADE ACTION 



YOU ARE-a PENGUIN in a maze of 
ice blocks which you can push 
or shatter. 

YOUR GOAL-connect three diamond 
blocks without getting stung. 





> 



YOUR STRATEGY-eliminate your 
pursuers by crumbling their 
hatching blocks or by sliding 
ice blocks at them as they 
move about the maze. 



Great Graphics & Sound Effects 



< 



Over 12 Increasingly Difficult 
Mazes Which Change As You Play 



One Or Two Player Option 



Only Requires 16K & A Joystick 

Cassette $24.95 Disk $28.95 
+$1.50 S/H In OH add 5*5% Tax 



CRYSTAL SOFTWARE 

6591 Dawsey Road 

\ Rook Creek, OH 44084 / 






HOMEBASE™ 






THE COMPLETE TRS-80* 
COLOR COMPUTER 

DATABASE 

IN ONE COMPLETE PACKAGE: 

TEXT PROCESSING»DATA MANAGEMENT 
SPREADSHEET CALCULATION • 

TEXT & DATA UTILITIES 



POWER & FLEXIBILITY: 

• PAGE NUMBERING & HEADINGS 

• RENAME files & PRINT DISK DIRECTORIES 

• VARIABLE LENGTH alpha/text data fields 

• DEFINE and TOTAL on fields within TEXT records 

• Print FORM LETTERS & MULTIPLE COPIES 

• FREE FORM REPORT WRITER for DATA files 

• 50 DATA FIELDS per data record 

• REORGANIZE data or text records 

• SEARCH on record names or any data 

• PRINT labels using text or data records 

• ASSIGN your own record & data names 

• FORMATTED printing for data records & fields 

• MERGE. BACKUP (to cassette), or COPY any file 

• 250 Screens of text with embedded printer controls 

• ASCENDING & DESCENDING SORT using any data 

• ADD. SUBTRACT. MULTIPLY or DIVIDE DATA FIELDS 



EASY TO USE AND WELL SUPPORTED: 

• NO programming or equipment modifications required 

• MENU driven with single stroke commands 

• COMPLETE cursor control for text & data entry 

• 120 PAGE MANUAL WITH 2 MASTER DISKETTS 

• REQUIRES: 32K Color Computer with 1 disk drive 

FOR VISA/MASTER CARD ORDERS CALL: 
800-334-0854 ext. 887 
in N.C. 919-544-5408 OR SEND $75.00 
check/money order 




HOMEBASE™ COMPUTER SYSTEMS 
P.O. BOX 3448, DURHAM, N.C. 27702 



N.C. residents add 4% sales tax. 
HOMEBASE'” is a trademark of HOMEBASE" 
COMPUTER SYSTEMS, a subsidiary of Small Business 
Systems, Durham. N.C. (919) 544-5408 
’TRS-80 is a trademark of Tandy Corp . 
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input/output memory area of the Color 
Computer (addresses $FF40 to $FF5F), 
and this, together with address line A2, 
activates each PIA when addresses $FF40 
through $FF43 (PIA #1) or $FF44 through 
$FF47 (PIA #2) are used. 

The RES* (reset) signal synchronizes 
the PIA and correctly establishes all regis- 
ters when the power is turned on or the 
Reset button is pressed; the E clock syn- 
chronizes the input/output timing with 
the computer's processor; and the RAN* 
(read/write) line identifies a read-from- 
peripheral or write-to-peripheral state. 

The remaining eight lines represent 
the data to be transmitted to the EPROM 
socket. The data fed through the first 
PIA's port A become actual data read 
from or written to the EPROM. The data 
fed through port B are used to hold 
stable the lower eight bits of the 
EPROM's address (AO -A7). 

Port A of the second PIA transmits the 
remaining six EPROM address bits; three 
(A8 - A10) complete the group of ad- 
dresses common to all EPROMs from 2K 
to 16K bytes. Address All must be 
added to address 4K of memory, A12 is 
added to address 8K, and A1 3 is used for 
16K EPROMs. These last three addresses 
are fed to a personality module, which 
routes them correctly as needed. Two 
bits of port A are not used. 



Table 7. PORT$FF46 


bit 7 bit 6 bit 5 bit 4 bit 3 


bit 2 bit 1 


bitO 


0V 5V 21V 25V — 


PGM* CE* 


DE* 


Programming/Reading Voltages (V pp ): 


Control/Select Lines: 


NJ 

II 

O 

NJ 

II 

O 

NJ 

II 

O 

O 

II 

o 


2764 


All 2716 


1 = Z 1 = 5V 1 =21V 1 =25V 


27128 


2764 


(Z = transitor turned off) 




27128 



Table 2. Port Values for 27 1 6 through 27 1 28 EPROMs 



Bits 


7 


6 


5 


4 


3 


2 


1 


0 






27 16 Off 


0 


0 


0 


0 


(0) 


(0) 


1 


1 


.. = 


$03 


27 16 read 


1 


1 


0 


0 


(0) 


(0) 


0 


0 


ss 


SCO 


2716setprgm. 


1 


0 


0 


1 


(0) 


(0) 


0 


0 


= 


$90 


27 16 pulse 


1 


0 


0 


1 


(0) 


(0) 


0 


010 


= 


$90, $91, $90 


2732 off 


0 


0 


0 


0 


(0) 


(0) 


1 


(0) 




$02 


2732 read 


1 


1 


0 


0 


(0) 


(0) 


0 


(0) 


= 


$C0 


2732 set prgm. 


1 


0 


0 


1 


(0) 


(0) 


0 


(0) 


= 


$90 


2732 pulse 


1 


0 


0 


101 


(0) 


(0) 


0 


(0) 


= 


$91, $90, $91 


2764 off 


0 


0 


0 


0 


(0) 


0 


1 


1 


= 


$03 


2764 read 


1 


1 


0 


0 


(0) 


1 


0 


0 


= 


$C4 


2 764 set prgm. 


1 


0 


1 


0 


(0) 


1 


0 


0 


= 


$A4 


2764 pulse 1 0 1 0 (0) 101 

(010 = level zero, pulse one, level zero) 
(101 = level one, pulse zero, level one) 


0 


0 




$A4,$A0,$A4 



FREE OFFER! 



COMPUTER 

CASSETTES 

580 

Free “World Capitals” Cassette Game 

(Compatible with TRS-80 Color Computer) 
with each order of 20 or more C-IO’s 

Specify TRS-80, VIC-20, Commodore 64 or TI-99/4A 
• C-10 Length 

• 5 Screw Shell/free Labels 

• Lifetime money back guarantee 

• Storage Box add 1 20 each 

• $2.00 shipping charge — any quantity 
(Canadian Orders $4.00 shipping) 

• NJ Residents add 6% Sales Tax 
• Send check or money order to 



PARALLEL SYSTEMS 

Box 772 

Tumersville, NJ 08012 
609-227-9634 




CC’s 



STUDENTS, Teachers, Managers, 
Investors, Programmers - Let 

your CoCo resolve data, charts and 
nomographs K|C\A#I ' nto CoCo 
solvable I'tii . equations 
for analysis & Mp\A/l forecasts. 
Selectable IN l— vv . 'straight 
line", cubic & biquadratic formats 
handle even highly complex func- 
tions. Use alone or as subroutine. 

This powerful new tool is available 
on tape for CoCo or in BASIC 
listing for others. Specify. 

C- FIT IS ONLY $ 23.00 

TRENDS" Analyze, file and 
project data according to YOUR 
needs. IDEAL FOR INVESTORS! 

16 or 32 K versions. Specify. 

S19.95 with FREE Stock 
Market data file. 




JAGER TECHNICS, Inc. 
3214 Windsor Lane 
Janesville, Wl. 53545 

Author submittals welcomed 
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The final port (PIA #2, port B) provides 
the necessary control signals. OE* (out- 
put enable), CE* (chip enable) and PGM* 
(program) are controls used in different 
ways by the four different EPROM sizes; 
not all are used by all EPROMs. Because 
of this, these must also be fed to the per- 
sonality module for correct routing to the 
EPROM socket. Bit 3 of port B is not used 
by the Color Burner. 

Bites 4 through 7 of port B select the 
voltage for programming or reading. For 



hardware simplicity and low cost, these 
are software controlled functions. Look 
at the schematic, Figure 2. When all bits 
areO, the -F5, -F21 and +25 volt lines are 
turned off, and the transistor is opened 
up to ground. Combined with high levels 
on bits 0, 1 and 2, the EPROM can be en- 
tirely deselected in software. Table 1 pre- 
sents the eight bits of port $FF46, and 
how they are arranged, and Table 2 
shows how the bits are used to select the 
off, EPROM read, EPROM voltage set, 



and EPROM program conditions. 

Building the Color Burner 

Any neat method of construction is 
fine for the Color Burner, including wire- 
wrapping, point-to-point soldering, or 
printed circuit board (see parts list for 
availability of boards and kits). Be sure to 
include the 0. 1 mF decoupling capacitors 
near their respective integrated circuits 
to assure reliable operation. » more 




Figure 2. Complete schematic of the Color Burner. 
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Before using the Color Burner, be sure 
to test voltages, and be careful not to 
allow the three 9-volt batteries to touch 
other areas of the assembly. The results 
of point-to-point wiring should look 
something like the prototype shown in 
Photos 1 and 2. 

Figure 3 shows personality modules 
for 2716 through 27128 EPROMs. Ob- 
tain 16-pin headers, and wire them as 
shown in the figure. Figure 4 shows the 
timing relationships required for reading 
and writing these EPROMs. 

Reading an EPROM 

Before attempting to program an 
EPROM, it's best to try to read one to 
make sure the Color Burner is working. 
Turn on the computer, insert a pro- 
grammed 2716 EPROM and the 2716 
personality module, and run the pro- 
gram in Listing 1 . It should print the con- 
tents of the EPROM in hexadecimal. 

Testing Voltages 

Once the read mode tests correctly, re- 
move the EPROM, poke &hff46,&hao and 
read approximately 21 volts at pin 2 of 
the personality module. Then poke 
&HFF46,&H90 and read approximately 25 
volts at the same pin. Finally, poke 
&hff46,o to turn all voltages off. 

The forward voltage drop of silicon 
diode and transistor junctions is 0.6 to 
0.8 volts. For 21 volts programming vol- 
tage, use a 22-volt zener and a diode for 
isolation. This results in 22 volts minus 
two junctions, or approximately 20.5 

t more 







Photo 7. Top view of the Color 
Burner prototype ; showing two 
6821 PI As, 28-pin socket, and per- 
sonality module. 



Which End Is Up? 

My mail tells me it's time for a quick 
review of integrated circuits, the 
"black boxes" inside the computer. 
These integrated circuits (commonly, 
but inaccurately, called "chips") are 
manufactured in what's known as a 
DIP (dual-inline package) configura- 
tion, and contain from six to 64 ex- 
ternal connections called "pins." To 
identify the numbering of the pins, lo- 
cate a notch or dot (sometimes both) 
which clearly distinguishes one end of 
the part. With the pins pointed down 
and the notch at the top, find pin 1 ; 
it is to the immediate left of the notch. 

You count down the left side and 
up the right side. The lowest-number- 
ed pin (pin 1) is always opposite the 
highest numbered pin (pin 6, 8, 14, 
16, 18, 20, 24, 28, 40, 52 or 64). A 



1 6-pin 1C (integrated circuit) is shown 
below. 

Integrated circuits usually have two 
printed lines. The first identifies a part 




number, usually consisting of a letter 
prefix or symbol to identify the man- 
ufacturer, the generic number, and 
the case type. The second line of the 
identification is the date code, usually 
written YYWW where YY is the year 
and WW is the week. For example, I 
find MC6847P 8004 printed on a part 
in my computer. MC tells me it's 
Motorola Corporation, 6847 is the 
type of part (a video display gener- 
ator, I now know), and P means a 
plastic case. The date tells me it was 
made during the last week of January 
1980. 

So when I tell you something like 
"solder a wire to pin 9 of your 16K 
RAMs," I mean to find the 4164 in- 
tegrated circuits (mine are marked 
MN4164P, Matsushita 4164 plastic), 
locate pin 9 (the first pin at the lower 
right), and solder there. ■ ■ ■ 
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Photo 2. Underside wiring of the 
Color Burner prototype. 
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Figure 3. Personality modules for 
271 6 through 27128 EPROMs. 









SELECTED 
*,** SOFTWARE ★ ★★★ 

FOR THE 

COLOR COMPUTER 

HARDWARE DISCOUNTS: 

Take 1 0% off the price of two or 
1 5 % off the price of 4 or more! 

Upgrade Your Color Computer! 

Complete solderless kits with 
easy-to-follow instructions. 



4K-16K For All Boards $19.95 

4K-32K For All Boards $54.95 

16K-32K For All Boards $39.95 

64K For E & F Boards Only $59.95 



If possible, specify board revision with order. 
Note: All ICs used in our kits are first quality 200NS 
Prime Chips and carry one full year warranty. 



REAL TALKER' 

COLORWARE Voice Synthesizer 

with Votrax chip ready to plug in & talk. Comes 
with software on cassette & user's manual. 

Cartridge $59.95 

SOFTWARE DISCOUNTS 
Take 1 0% off the price of one, 
15% off the price of two or 
20% off the price of 4 or more! 

All programs are in 16K machine 
language on tape unless noted. 

DATA SOFT 

*ZAXXON(32K) Sega official version. $39.95 
* * POOYAN (32K) Konami official version. 



Cassette and disk included. $29.95 

* * MOON SHUTTLE Nichibutsu official 

version. Cassette and disk included. $29.95 

TOM MIX SOFTWARE 

* BUZZARD BAIT (32K) Outstanding! $27.95 

* DONKEY KING (32K) Outstanding! $26.95 

* TRAP FALL Just like Pitfalls. $27.95 

SPECTRAL ASSOCIATES 

* * FROGGIE ( 32K) The best of its type. $24.95 

* LUNAR ROVER PATROL (32K) 

Outstanding. $24.95 

*CUBIX(32K) Excellent. $24.95 

* LANCER I32K) Excellent Joust type. $24.95 

* ANDROID ATTACK Comes with 

1 6K & 32K. 32K version will talk. $24.95 

* MS. GOBBLER (32K) Outstanding. $24.95 

*WHIRLYBIRD RUN Excellent. $24.95 

* GALAX ATT AX Protect your base by 

shooting alien fighter in formation. $24.95 

* PLANET INVASION Defender game. $24.95 

* DEFENSE Strikingly good. $24.95 

* SPACE WAR Break through enemy 

fighters & Death Star defenses. $24.95 

* * SPACE INVADERS Still the best. $17.95 

* GHOST GOBBLER Highly rated! $21.95 

INTRACOLOR 

** COLORPEDE Just like the arcade. $29.95 

* ROBOTTACK Just like the arcade. $24.95 

COMPUTERWARE 

* JUNIOR'S REVENGE (32K) Climb 
vines, avoid obstacles & creatures 

to save your Father from Luigi. $28.95 

* GRAN PRIXI32K) Challenging race. $21 .95 

* DOODLE BUG Just like Ladybug. $26.95 

ELITE SOFTWARE 

*ZAKSUND(32K) Excellent. $24.95 

RAINBOW CONNECTION SOFTWARE 
RAINBOW SCREEN MACHINE 

Tape $29.95 Disk $32.95 

SUPER SCREEN MACHINE 
Tape $44.95 Disk $47.95 

Please note: 

Software & hardware cannot be mixed for discount. 

* Requires Joystick * * Joystick Optional 



We pay postage on all orders in the U.S. & Canada. 

Overseas add $3.00. (MN Res. add 6% sales tax.) 
Wc accept Visa, Mastercard, check or money order. 
U.S. funds only for foreign orders. 

C.O.D. please add $2.00. 

send to SELECTED SOFTWARE 

Dept. C, P.O. Box 32228 
Fridley, MN 55432 





volts. Test the voltage; if it is outside the 
high range of 22 volts, add a second 
diode. If it is outside the low range of 20 
volts, obtain a zener diode of slightly 
higher value or tolerance, or use a ger- 
manium diode in place of the 1N4148. 
For 25 volts programming voltage, use a 
27-volt zener plus two diodes for isola- 
tion. This results in 27 volts minus three 
junctions, or approximately 25.0 volts. 
Test voltage; if it is outside the high 
range of 26 volts, add a third diode; if it 
is outside the low range of 24 volts, re- 
move one of the 1 N4 1 48 diodes. 

Once everything works, take a break. 
Don't try to program anything now! 
Wait 'til May, when I'll present a com- 
plete software utility for the Color 
Burner. 

Update: Access Time 

Myth-dispelling time again. One of the 
well-guarded secrets of computer opera- 
tion is what's called "access time"; when 
someone tells you "be sure to get 200 nS 
RAMs, " they mean to get memories with 
a specified access time of 200 nanosec- 
onds, 200 billionths of a second. And 
they may be wrong. 

Access time is the time it takes data to 
be made ready for the computer's cen- 
tral processing unit (CPU), but that defi- 
nition is deceptive. With a fistful of man- 
ufacturer data sheets, you can solve the 
access time mystery for yourself. I don't 
take much in computerdom on faith, so 
I decided to do a little research. 

There are a lot of numbers involved. I 
open a Hitachi memory data book to the 
64K RAMs, and turn to the HM4864 de- 
scription, which runs 10 pages. It says 
"HM4864-3, 200 nS access time, 335 nS 
cycle time." Now I've got two figures. I 
find on the third page of the data book 
that access time from RAS* is specified at 
200 nS, and from CAS* is 135 nS. What 
are RAS* and CAS*? How is this specifi- 
cation understood? 

In dynamic memories (Color Com- 
puter RAMs are such), the address is pre- 
sented in two halves— eight low address 
bits, and eight high address bits. RAS* 
and CAS* are electronic signals that de- 
fine which half, and when. RAS* (row 
address strobe) says "here are the low 
address bits" and CAS* (column address 
strobe) says "here are the high address 
bits." 

Nestled among the 35 memory timing 
specifications and 10 footnotes I find 
this information: "Operation with tRCD 
(max) limit ensures that tRAC (max) can 
be met, tRCD (max) is specified as a refer- 
ence point only; if tRCD is greater than 
the specified tRCD (max) limit, then ac- 
cess time is controlled exclusively by 
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Figure 4. Timing diagrams for 2716 
through 27128 EPROMs. 



10 X = &HFF40 : REM * Point X to PIA Port 

11 POKE X+1,0 : POKE X,0 : POKE X+1,4 

12 REM * Above sets port 1A = Input Port 

13 POKE X+3,0 : POKE X+2,255 : POKE X+3,4 

14 REM * Above sets Port IB = Output Port 

15 POKE X+5,0 : POKE X+4,255 : POKE X+5,4 

16 REM * Above sets Port 2A = Output Port 

17 POKE X+7,0 : POKE X+6,255 : POKE X+7,4 

18 REM * Above sets Port 2B = Output Port 

19 POKE X+6 , &HC0 : REM -> 2716 Read Setup 

20 FOR Y = 0 TO 7 : REM -> A8 through A10 

21 FOR Z = 0 TO 255 : REM -> A0 through A7 

22 POKE X+2 , Z : REM -> Address L.S. byte 

23 POKE X+4 , Y : REM -> Address M.S. byte 

24 PRINT HEX$ ( PEEK ( X) ) " : REM -> Data 

25 NEXT : NEXT : REM -> Print Whole EPROM 

26 POKE X+6,0 : REM -> Active Signals Off 
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tCAC." Uh-huh. In English, this means 
that there is a short space of time (in this 
case, 20 to 65 nS) that must be left be- 
tween the RAS* row-address signal and 
the CAS* column-address signal. It can't 
be shorter than 20 nS. On the other 
hand, if this space is longer than 65 nS, 
then access time is effectively defined 
simply by how long the CAS* signal is 
held stable ... in this case, CAS* can't be 
shorter than 135 nS, as the specs men- 
tioned earlier. 

Now to the computer. For this, I turn 
to the MC6809E data sheet (that's the 
CPU) and the MC6883 data sheet (that's 
the synchronous address multiplexer, or 
SAM, which controls the memory ac- 
cess). 

There are 22 timing specifications for 
the MC6809E, one of which is "usable 
access time" at 1 MHz (one million clock 
cycles per second). Usable access time is 
695 nS (minimum). Since the Color Com- 
puter runs at .89 MHz, I can calculate 
that its access time would actually be 
slightly longer, or about 780 nS. On a 
straight 6809-based computer, then, 
memories with an access time of longer 
than 500 nS would bejust fine. 

On the Color Computer, though, this 
isn't the case, because the memory ac- 
cess is actually controlled by the 



MC6883, the SAM. The timings listed for 
the SAM are sketchy, but one critical fig- 
ure is given: timing from CAS* to RAS* 
is specified as 208 nS "typical." The tim- 
ing from CAS* to RAS* is effectively the 
length of CAS*, and so it looks like 200 
nS should be the access time of the mem- 
ory used ... but not so fast! That answer's 
deceptive, too. There's still a little more 
work to do. 

Remember what the memory data 
sheet said: if the time between RAS* and 
CAS* is greater than 65 nS, then the ac- 
cess time is controlled by the length of 
CAS*. What is the length between RAS* 
and CAS*? The timing specification table 
doesn't show it, but the timing diagrams 
a few pages later mention it in a foot- 
note: it is defined as "eight cycles of Osc- 
Out," that is, eight cycles of the 
14.31818 MHz master clock, or about 
560 nS. 560 nS is definitely longer than 
65 nS, so the memory access time is in- 
deed controlled exclusively by the length 
of CAS*. 

Two hundred nS memories need a 
CAS* of 135 nS or longer. It turns out 
that 300 nS memories have a CAS* mini- 
mum of 205 nS — almost exactly the 
specification of RAS* to CAS* on the 
SAM chip. In fact, here's a list: 



Access Time CAS* Length 



150 


100 


200 


135 


250 


170 


300 


205 


350 


235 


400 


270 


Any memories with an 


access time of 


300 nS or lower will meet the CAS* spec- 


ification of the Color Computer's SAM. 


Oh yes. One more thing: "cycle time." 


Remember it was specified as 335 nS for 


the 200 nS memories. 


Here's another 


list: 




Access Time 


Cycle Time 


150 


250 


200 


335 


250 


420 


300 


500 


350 


585 


400 


670 



The cycle is the complete time from one 
memory use to the next memory use. On 
the Color Computer, the cycle time is 
208 nS (CAS*) + 559 nS (RAS* to CAS*) 
= 767 nS. Any memory in the list meets 
this spec, so the controlling factor for 
Color Computer memories is access 
time. ■ ■ ■ 



ATTENTION, CoCo OWNERS 

STOP changing Printer & Modem 
Cables! Our PARALLEL PRINTER 
INTERFACE provides SWITCH SELECT- 
ABLE PRINTER or MODEM operations. It 
features switchable baud rates from 300 to 
9600; comes complete with power supply, 
modem cable & “CENTRONICS” type 
printer cable. 
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P.O. DRAWER 55868 
HOUSTON, TEXAS 77055 
(713)956-0207 

ORDER DIRECT FROM US OR FROM YOUR 
INDEPENDENT COMPUTER RETAIL STORE. 

Only $89.95 plus $3.00 Shipping 
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OS/9 

Radio Shack 
1 400 One Tandy Center 
Fort Worth, TX 761 16 
(817)390-2959 

$69.95 

64K, diskdrive 

Y ES, INDEED, the Color Computer is 
now out of the "home computer" 
class and into serious competition with 
computer systems that cost many times 
as much, thanks to OS/9, Radio Shack's 
sophisticated and powerful new operat- 
ing system. OS/9 was designed with pro- 
grammers in mind and has many fea- 
tures not usually found on microcomput- 
er systems, but while it lets Color Com- 
puter programmers expand their hori- 
zons, it still lets them use the basic con- 
figuration that's made the Color Com- 
puters© popular all along. 

Having programmed on mainframes 
for many years, I find the OS/9 and main- 
frame programming environments simi- 
lar. Usually, the microcomputer does little 
for you. You, the user, must create every- 
thing yourself. But OS/9 takes you out of 
the Disk Basic environment and puts you 
where you can make much more efficient 
use of your time and effort. 

The OS/9 system requires 64K of RAM. 
It will not run with less memory because 
of the system overhead required for its 
operation. When it's up and running, 
you have approximately 46K of usable 
memory left. OS/9 also requires at least 
one disk drive. It will support a printer, 
joysticks, RS-232C communications port, 
and color graphics. In other words, if you 
have a standard Color Computer with 
64K and a disk drive, you can run OS/9. 

What exactly is an operating system? 
An operating system is a program which 
manages the functions of your com- 
puter. No computer can run without 
one. It is the interface between you and 
your computer. Via your operating sys- 
tem, you can run your own programs, or 
"applications" programs. Normally, you 
might write an applications program in a 
language like Basic. Basic would then 
have to interface with the operating sys- 
tem to eventually translate Basic state- 
ments into machine language state- 
ments the computer can understand and 
execute. Operating systems are usually 
"transparent" to users, that is, they 
aren't really noticed once a few rules are 
learned. However, the power of your 
computer to run your programs is directly 
related to the power of your operating 



system. The more powerful your operat- 
ing system, the more your computer will 
do for you. 

OS/9 is a powerful operating system 
developed by Microware for computers 
using the Motorola 6809 microproces- 
sor. Radio Shack's version of OS/9 was 
adapted for the Color Computer last 
year. So, while OS/9 for the Color Com- 
puter is relatively new, OS/9 itself has 
been around for several years. It was pat- 
terned after an operating system for mini- 
computers called Unix. Unix was de- 
veloped by Bell Laboratories, Inc. The 
Color Computer version of OS/9 has 
many similarities to Unix. It includes a 
multilevel filing system, multiuser/multi- 
tasking operations, a device-indepen- 
dent input and ouput system, and modu- 
lar memory management. Let's look at 
each of these major features in turn. 



"Multi-power" 

The multilevel filing system is the heart 
of OS/9. It establishes a hierarchical 
structure of files which lets you manipu- 
late files in a well-structured fashion. Fig- 
ure 1 gives you an example of how a hier- 
archy of directories and files might be set 
up. You can set up directories and files 
however you wish. The "path" to any 
given file is given simply by describing the 
path to the file. For example, to delete 
the file called "DAILY" in the example, 
the following OS/9 command would be 
issued: 

DEL /DO/SC H E D U LE/M ASTE R/D Al LY 

The idea is to give the command (DEL 
= delete), followed by the pathlist with 
each station on the path separated by a 
slash. Organizing files like this allows for 
a much more structured approach to 
programming than XXXXXXXX.YYY file 
designations, with all files contained in 
the same directory. With OS/9, directo- 
ries can be established for each function 
The directories can contain all necessary 
programs and data files for the execution 
of the particular process. The ability to 
functionally separate directories and files 
is necessary when you consider the next 
feature of OS/9, its multiuser/multitask- 
ing ability. 

"Multiuser" means more than one 
user can use the system at the same time. 
Of course, you can only have as many 
users as you have terminals available. 
Since the Color Computer only has one 
RS-232C port, only one terminal at a 
time may be connected via this port. That 



means two people at the same time can 
use the Color Computer via OS/9. 

"Multitasking" refers to the idea that 
the computer can be executing more 
than one task at a time. While these tasks 
are not really executed in truly simultane- 
ous fashion, they appear to be taking 
place at the same time. OS/9 divvies up 
the available resources according to 
priorities and allows all programs to ef- 
fectively share those resources. That 
means you can execute more than one 
program at once. For example, you may 
have one program sending output to the 
printer while you are editing another. 

How OS/9 uses device-independent 
input and output is that it simply desig- 
nates one device as the "standard" input 
device and another device as the "stan- 
dard" output device. Actually, the key- 
board is the default input device and the 
terminal screen is the default output de- 
vice. If you want input to come from 
another source, you simply redirect the 
input. Output works the same way. In 
practice, you give an operand to a com- 
mand which serves the purpose of redi- 
recting input or output. For example, 
suppose I wanted to print the contents of 
the directory called SCHEDULE (see Fig- 
ure 1) on the printer instead of the 
screen. I would issue the command : 

DIR /DO/SCHEDULE >/P 

The ">/P" indicates that output 
should be redirected to the printer (rep- 
resented by the "/P") instead of to the 
normal output device. By the same token, 
input can come from a source other than 
the keyboard by using the "<" symbol, 
followed by the abbreviation for the ap- 
propriate device. When you get used to 
designating the path and the redirection 
of input/output, it is easy to use and very 
straightforward. 

The advantage of this system is that 
programs can be developed without re- 
gard to individual input and output 
paths; paths can be designated when 
the program is run. This is similar to the 
way minicomputers and mainframes op- 
erate. Programs are designed to place 
output in designated buffers and job 
control language statements then direct 
the computer to route the contents of 
those particular buffers to specific out- 
put devices. Thus, to change output from 
screen to printer, you do not have to 
modify a program, you simply change 
the job control language. Similarly, OS/9 
allows you to change the input or output 
path when the program is executed. For 
example, if WEEKLY were a program I 

$ to page 139 
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THE TOP 4 COCO GAMES... 
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CUBIX 

By Spectral Associates. Very 
much like the arcade smash! 
Jump little Cubix around the 3D 
maze trying to change the color 
of all the squares. With Death 
Globes, Discs, Snakes, etc. 32K 
Tape: $24.95 



ZAKSUND 

From Elite Software comes this 
fantastic arcade style space 
action game with 3 different 
stages of moving 3-D graphics. 
You've never seen anything like 
this on your CoCo! Great sound 
too! 32K Tape: $24.95 



THE KING 

Previously called 'Donkey King', 
you simply cannot buy a more 
impressive game for your CoCo. 
With 4 different screens and 
loads of fun! From Tom Mix Soft- 
ware. 32KTape: $25.95 



GHOST GOBBLER 

From Spectral Assoc. This 
"PAC" theme game has been 
improved several times. It is 
definitely the best of its type. Bril- 
liant color, action and sound, 
just like an arcade. 16K Tape: 
$24.95 



COLORCADE 

SUPER IOYSTICK MODULE 



WITH 
RAPID 

FIRE! 

/w# 



T)NLY $19.95 



IOYSTICK INTERFACE/RAPID FIRE/6 FT. EXTENDER ALL IN ONE! The 

Colorcade allows connection of any Atari type joystick to your CoCo 
(including the Wico Red Ball). These switch type sticks are extremely 
rugged and have a faster and more positive response. They will improve the 
play of almost any action game. 

An adjustable speed rapid fire circuit is built in. Press your fire button and 
get a great burst of fire instead of just a single shot! You get a real advantage 
in shooting games that do not have repeat fire. 



ATARI JOYSTICK 

ONLY 
$8.50 



THE BEST YOU 
CAN BUY 
WICO MS-9730 

$29.95 



WICO FAMOUS 
"RED BALL" 



ROM/ PROJECT/ 
PRODUCT CASE 



Give a professional look to your project 
or product! High quality 3 piece injection 
molded plastic with spring loaded door. 
Designed especially for the CoCo ROM 
slot. 

2 - 4 pcs $5.50 Ea. 

5 - 9 pcs $3.50 Ea. 

10 -99 pcs $2.75 Ea. 

100 & UP Call Us 

P.C. board for 27XX EPROMS. . . $4.00 Ea. 



COLORWARE 
LIGHT PEN 

ONLY $19.95 

WITH SIX FREE 
PROGRAMS ON 

CASSETTE! 

The Colorware Light Pen plugs directly into your joystick port and 
comes with six fun & useful programs on cassette. Easy instruc- 
tions show how to use it with Basic and it's compatible with light 
pen software such as Computer Island's "Fun Pack." Order yours 
today. Only $1 9.95 complete. 



TELEWRITER-64 



1ELEHRI7EC-64 

This is at actual unretowhed roloroid Kioto of a 
Mac ax) rfiite areeri Sonins the 51x24 character 
set that is senerated by "teletext-MV Botice 
hon there is also true loner case* not the reverse 
uw«r case letters that nerely rewesent loner 
case characters in other Color Coneuter rrosrws. 

leleiriter-64 is truly the Host eonerful and 
sophisticated word processor you can buy Cor yew 
Color Cowvter or TIP-100. It you oin a printer 
or are thinfcins of settim one* you really should 
not be nithout this wosran. Telariter ca< be 
jsed mth ary 1MC» 38 or syste* and nth an. 
Color Cowuter coneatible winter. 

ABC IEFGHI JKl HHOPOtSlUVUXY 
Z1 2 3 4 5* ? 8 *• I ‘ * 2 l * < > » * C 8 I 



DISK $59.95 

CASSETTE. . . $49.95 



Colorware researched the word 
processors available for the Color 
Computer. This is the best. Tele- 
writer-64 is a truly sophisticated sys- 
tem that is marvelously easy to use. 
It works with any 16K, 32K or 64K 
system and any CoCo compatible 
printer. 



TOP-RATED COCO 
WORD PROCESSOR 



[COLORWARE 



VISA 



TOLL FREE ORDERING 

800-524-3131 
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REAL TALKER' 

HARDWARE Voice Synthesizer 

NEW from 
COLORWARE.. 

only... $59. 95 
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THINKING OF BUYING A 
COCO VOICE SYNTHESIZER ? 

READ THIS.... 

Making your computer talk couldn't be any easier! 

'Real Talker' is a full featured, ready to use, HARDWARE 
voice synthesizer system in a cartridge pak. It uses the 
Votrax SC-01 phoneme synthesizer chip to produce a 
clear, crisp voice. 

FREE TEXT-TO-SPEECH 

Included free with 'Real Talker' is Colorware's 
remarkable Text-to-Speech program. This is a truly 
powerful machine language utility. What it does is 
automatically convert plain English to speech. And it has 
an unlimited vocabulary! For example, use it in the direct 
mode: Type in a sentence or a paragraph, even mix in 
numbers, dollar signs, etc., then press enter. The text is 
spoken. At the same time a phoneme string is generated 
which can be saved to cassette or disk, modified or used 
in a Basic program. 

We originally planned to sell this major piece of 
programming for about $40.00 but decided it was so 
useful that no 'Real Talker' user should be without it. 
Besides, it really shows off the capability of 'Real Talker'. 

Also included with 'Real Talker' is our unique Phoneme 
Editor program. It allows you to explore and create 
artificial speech at the phoneme level. Phonemes are the 
fundimental sounds or building blocks of word 
pronunciation. There are 64 different phonemes, as well 
as 4 inflection levels at your disposal. Creating and 
modifying speech at the phoneme level is both fascinating 
and educational. The Phoneme Editor may also be used to 
customize the pronunciation of speech produced by the 
Text-to-Speech program. 
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You don't have to use any of our utility programs 
though. If you write your own Basic Programs, you will 
find the pocket sized Votrax Dictionary (included free) is 
all you need to make your own Basic programs talk. This 
dictionary gives you quick access to the phoneme 
sequences used to create approximately 1 400 of the most 
used words in the English language. 

How about compatibility? 'Real Talker' is compatible 
with any 16K, 32K, 64K, Extended or non-extended Color 
Computer. It works with any cassette or disk based 
system, with or without the Radio Shack Multi-slot 
expander. No other synthesizer under $100 can make this 
claim. Most other CoCo voice synthesizers require an 
expensive Multi-slot expander in order to work with the 
disk system. 'Real Talker' requires only an inexpensive Y- 
adapter. This is an important consideration if you plan on 
adding a disk or have one already. 

'Real Talker' comes completely assembled, tested and 
ready to use. It is powered by the CoCo and talks through 
your T.V. speaker so there is nothing else to add. Price 
includes Text-to-Speech and other programs on cassette 
(may be transferred to disk), User Manual and Votrax 
Dictionary. ONLY $59.95 | 

'Y-BRANCHING CABLE' For disk systems. This 40-pin, 3 
connector cable allows 'Real Talker' to be used with any 
disk system $29.95 j 

YOU DECIDE.... 

Order yours today on our Toll-Free Order Line. If you are 
not delighted with your 'Real Talker' system, simply 
return it within 30 days for a prompt, courteous refund. 
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COLORWARE INC. 
78-03A Jamaica Ave. 
Woodhaven, NY 11421 
(212)647-2864 



VISA 



★ ★ ★ ORDERING INFORMATION ★ ★ ★ 

ADD $2.00 PER ORDER FOR SHIPPING & HANDLING. 

C O D. 'S: ADD $3.00 EXTRA. 

SHIPPING & HANDLING FOR CANADA IS $4.00 
WE ACCEPT VISA , MASTER CARD, M.O.'S, CHECKS. 

N. Y. RESIDENTS MUST ADD SALES TAX. 
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32K MACHINE LANGUAGE 
TAPE $27.95 
DISK $30.95 



By Rugby Circle 



We’ve done it again! You thought The 
King was great? Wait ’til you see this!! 
Outstanding high resolution graphics, 
tremendous sound make this “Joust” 
type game a must for your software col- 
lection. As you fly from cloud to cloud 
you will enjoy sky high excitement deal- 
ing with the challenges presented to you 
by this newest release by Tom Mix Soft- 
ware. Circle No. 7 on Reader Service Card 
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TOM MIX SOFTWARE 

3424 COLLEGE N.E. 
GRAND RAPIDS. Ml 49505 



To Order Call 364-4791 
To Place Orders After 5:00 P.M. 
Call Our BBS At 
(616)364-8217 



*ADD $1.00 POSTAGE & HANDLING*TOP ROYALTIES PAID* 
•MICHIGAN RESIDENTS ADD 4% SALES TAX* 
LOOKING FOR NEW SOFTWARE 

ARCADE ACTION GAMES 
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Figure 1. Sample Directory and File Configuration 

I from page 134 



wanted to run, I would designate the 
proper path and then redirect the output 
likethis: 

/DO/MASTER/weekly >/P 

As you can see, that's a lot easier than 
going into the program code itself and 
changing it If you were working in Disk 
Basic you would have to change the ap- 
propriate print statements to print #-2 
statements. Then you would have to run 
the program with the changes. (You 
could get around that by having two rou- 
tines in your program, one for terminal 
output and the other for printer output. 
But that increases the size of your pro- 
gram and it takes more memory. With 
OS/9, you can manipulate the input or 
output path at execution time.) 

The fourth little treasure, modular 
memory management, is useful for maxi- 
mizing the use of your available RAM. 
OS/9 allocates memory in a manner that 
allows the modular use of available 
memory. All programs that are loaded 
must be in memory module format. A 
module directory is maintained for each 
program. This directory contains infor- 
mation about the program module 
which includes its name, address in 



memory and the number of processes 
using it. More than one process can use 
a single module. OS/9 uses a concept 
called the "reentrant" program that 
loads a program into memory and, if 
three different processes need the pro- 
gram at the same time, lets a single copy 
be used by all three (essentially, separate 
pointers are used for each process). That 
means that it is not necessary to load 
three copies into memory, one for each 
process. Obviously, this can save a lot of 
memory when using the multiprocessing 
feature of OS/9. 

When a module is no longer needed, 
OS/9 deallocates the part of memory that 
had been assigned to that module and 
makes it available to another module. 
Other than the RAM needed by OS/9 (lo- 
cated at the top and bottom of free mem- 
ory), all other available RAM is pooled and 
marked as "free memory space." Any- 
time OS/9 allocates or deallocates mem- 
ory, it is from this pool. Using this type of 
management allows OS/9 to effectively 
supervise the logical, as well as the phys- 
ical, contents of memory. 

Given these four major features, what 
else will OS/9 do? The main advantage 
of a system like OS/9 over a ROM-based 



system like Radio Shack Disk Basic is the 
fact that you can modify it. You can also 
create your own commands by simply 
writing modules to perform given func- 
tions. You can write processes of your 
own using existing OS/9 commands, put 
the commands in sequence and place 
them in a file. If you name the file, it will 
execute all the OS/9 commands con- 
tained therein. The operating system 
can, literally, become whatever you want 
to make it. There are drawbacks to the 
system though. 

One of the drawbacks is the screen 
format. The standard Color Computer 
32x16 screen is used with reverse video 
for lowercase. Radio Shack should have 
considered a high resolution screen that 
could be optionally switched off to con- 
serve memory. A 51 x 24 screen format 
with lowercase would certainly make as- 
sembly language programming easier 
and would make the screen much more 
presentable. Lowercase is used exten- 
sively in OS/9 and after awhile it gets 
bothersome looking at the "checker- 
board" effect caused by the reverse 
video form of lowercase. 

The system comes complete with an 
editor, assembler and debugger. I found 
the editor to be lacking in several impor- 
tant areas. Other Color Computerists 
have gone farther and called it "grue- 
some." It seems that its line orientation 
is somewhat cumbersome to use. I would 
have preferred a full screen format with 
cursor control. The editor that is included 
is a very basic line oriented editor that 
gets the job done, but not without some 
initial difficulty. 

The assembler and debugger, how- 
ever, are easy to use and have a variety 
of commands that can be used to save 
time and effort. Generally, I had no prob- 
lem learning to key in programs, assem- 
ble them and debug them using the de- 
bugger. 

For those of you who do not know as- 
sembly language programming, OS/9 
will support a number of higher level lan- 
guages, Basic09, versions of Basic from 
sources other than Radio Shack, the C 
language, and several versions of Pascal. 
As the popularity of OS/9 increases, I ex- 
pect to see more high level languages be- 
come available. On the applications soft- 
ware side, not much is available yet. 
Some vendors have business software 
available, but, generally speaking, there 
is little commercial software on the mar- 
ket yet. 
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Figure 2. Typical File A ttribute Section. 
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Anyway, back to the positive side. One 
positive feature is OS/9's built-in security 
system. Each OS/9 file has protection 
codes that give you a good variety of ac- 
cess possibilities. Figure 2 shows a typical 
file attribute section of a directory entry. 
It shows that the sample entry is a direc- 
tory, shareable, public execute, public 
write, public read, owner execute, owner 
write and owner read. If any of these 
values were turned off, a dash (-) would 
appear in the entry. For example, if the 
file in question were a text file instead of 
a directory, the first position would con- 
tain a dash. As a further example, the fol- 
lowing entry could be a text file which is 
not shareable, not available for public ex- 
ecution, write or read, but that is avail- 
able for owner execution, write and 
read. The entry would look like this: 

— e w r 

Once you memorize what each posi- 
tion means, you can look at the entry for 
any file and see what its status is. Each 
user can log in with a specific user ID and 
password, as established by the system 
manager (you), so everyone using the 
system can keep and protect their own 
files and not worry that others will look 
at them or write to them, unless you de- 
cide to make that capability available. 

OS/9 fully supports the operation of 
the RS-232 port. It can be operated at all 
standard bauds from 1 1 0 to 2400. By us- 
ing the xmode command, you can ex- 
amine and change settings to the port. 
This allows you to set up for communica- 
tions or for printer output. Additionally, 
OS/9 will support two disk drives. Other 
hardware devices may be added as the 
need or desire arises. 

Using OS/9 

OS/9 comes with two disks. One is 
labelled "OS/9 Boot," the other is the 
"OS/9 System Master." To load (boot) 
OS/9, you insert the OS/9 Boot disk and 
type in one of two commands, depend- 
ing on the version of Radio Shack Disk 
Basic that you have. If you have version 
1.0, you type run If you have Disk 
Basic 1.1, you type only DOS and press the 
Enter key. A menu will appear which 
gives you the option of testing your 
drive(s) or booting OS/9. If you test a 
drive, its revolutions per minute will be 
displayed. If you choose the boot option, 
OS/9 will boot automatically, and you 
will be prompted to insert the System 
Master disk. Once you have inserted the 
System Master and pressed Enter again, 
you will be asked to enter the date and 
time. OS/9 contains a real time clock and 



entering the date and time sets it. When 
the boot is complete, the OS/9 prompt 
will appear, you are in the OS/9 environ- 
ment, and you may enter any OS/9 com- 
mand. 

To create directories for you own use, 
you use the makdir command. Once you 
have created your directory and wish to 
build a file, you can use either the build 
command, which lets you build (but not 
edit) a file, or you can enter text via the 
edit command, and use the editor. Either 
way, you can enter text and create a file. 
Any type of file may be created, as OS/9 
does not distinguish between file types, 
as Disk Basic does. In general, all files are 
stored identically, with headers, as ASCII 
files. One of the first things you probably 
realized with Radio Shack Disk Basic was 
that you could not simply enter a text file 
as you would a Basic program. You prob- 
ably had to write some kind of editor pro- 
gram in Basic and then run it to enter 
your text. The editors are already present 
in OS/9, so you are ready to enter text 
into any type of file you desire as soon as 
OS/9 is properly booted. 

Although OS/9 does not distinguish 
between file types, it does distinguish be- 
tween the different logical uses of files. 
The advantage of not distinguishing be- 
tween file types is that all file handling 
commands may be used on all files (copy, 
del, and so on). The logical use of any 
given file may vary from time to time. 
Logical files are categorized by the fol- 
lowing possible uses: Text, Random Ac- 
cess Data, Executable Program Modules, 
Directories, and Miscellaneous Use. 

Text files are simple ASCII files wherein 
each line ends with a carriage return 
character (hex od). A text file can contain 
program source code, data or procedure 
files. The text editor can be used to edit 
these files, as they are used as basic se- 



quential files. The list command will print 
a text file. 

Random access files are used by higher 
level languages in a slightly different way 
than text files. The files are still saved in 
a sequential format, but the records are 
not of variable length: they are sequen- 
tial files with fixed-length records. To di- 
rectly access any record, one simply 
needs to know which record needs to be 
accessed. That record can be directly ac- 
cessed by multiplying the record length 
by the desired record number and add- 
ing the product to the beginning address 
of the file. 

Executable program module files are 
object code files which can be loaded 
into memory and executed by the com- 
puter. Each of these files must have a 
header record and a cyclical redundancy 
checksum (CRC) value. The dump com- 
mand is used on these to examine their 
contents. 

Directories are organized into 32-byte 
records. Each record represents a direc- 
tory entry and part of the record points 
to the actual location of the file on the 
disk. 

Virtually any other type of file organi- 
zation can be developed with OS/9, in- 
cluding Cobol ISAM (indexed sequential 
access method) files. Although Cobol is 
not yet available for OS/9 on the Color 
Computer, programmers could create 
any type of similar file structure for use 
on OS/9 disks. 

When you are in the OS/9 environ- 
ment, you are dealing with a "shell. " The 
shell is that part of OS/9 that provides the 
interface between you and the system. 
When you issue a command, the system 
searches for a file with the same name in 
the following order: Memory (programs 
residing in memory), Execution Directory 
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(a directory that holds OS/9's command 
or user programs), and User Data Direc- 
tory (a directory containing files used as 
"procedure" files). 

If the command represents a proce- 
dure file, the file contains other OS/9 
commands and the commands are ex- 
ecuted sequentially as contained in the 
file, as if you had entered them, one by 
one, from the keyboard. 

When the shell receives a command 
from you, it parses the command to 
check syntax, finds the file as explained 
above and executes the file as appropri- 
ate. If, for example, you gave a command 
such as list, the shell would become 
deactivated until list had completed, and 
then it would awaken and return an OS/9 
prompt. The possibilities with shells are 
unlimited. You can writea program which, 
in effect, becomes your own user shell. 
Using the OS/9 shell for log-in, you could 
then call your own shell and spend the 
rest of the session with it as your shell 
program. 

Using Assembly Language 

If you want to write a program in as- 
sembly language, you could use edit to 
create the text file containing your 
source statements; use the assembler to 
assemble the source code and generate 
the object (machine) code file; and test 
the object code generated by running it, 
using the debugger. 

If you have programmed in assembly 
language before, you may find OS/9 dif- 
ferent at first. For your program to run 
correctly it must be position-indepen- 
dent, or contain no references to specific 
memory locations that affect the physical 
location of the program in memory. And 
all memory locations modified by the 
program must be addressable with rela- 
tive addresses. These rules exist because 
chances are that your program may not 
reside in the same area of memory every 
time it's loaded. Absolute addresses are 
not known until the program is loaded 
and can vary from one load to another. 

The OS/9 macro assembler contains 
many macros' instruction sequences that 
are easily accessed by an assembly lan- 
guage program. These macros are fully 
documented and are accessed with 
single statements. The macros are en- 
hancements to the basic 6809 instruc- 
tion set. They let programmers perform a 
function with a minimum of coding by 
calling a pre-existing block of code. The 
many macros available make assembly 
language programming in the OS/9 envi- 
ronment much easier than in the Disk 
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4791 Broadway, Suite 2F Dept. CM 
New York, New York 1 0034 

MORSE CODE TEACHER — Teaches the letters 
and numbers and gives practice to up to 5 wpm. 

Req. 16K ECB $1 5/Cass 

MORSE CODE TUTOR — Gives code practice up 
to 27 wpm. A must for upgrades .... $1 5/Cass 
HF ANTENNA DESIGN — Calculates dimensions 
of quads, dipoles, and Yagis, optimized for 
maximum gain. Req. 4K RAM $10/Cass 



GORILLA BANANA 5x7 DOT MATRIX PRINTER 

$225 

GORILLA HI-RES GREEN SCREEN MONITOR 

$ 99 

SIGNALMAN SMART MODEM 300/1 200 BAUD 

$369 

SIGNALMAN I 300 BAUD DC MODEM $ 85 

CoCo SERIAL Y CABLE $ 16 

No more switching between modem and printer 
CoCo SERIAL TO RS-232 CABLE M/F $12 

COMPOSITE VIDEO ADAPTER $ 20 

Use CoCo with hi-res monitor 
*** CUSTOM CABLES ON REQUEST 

ELEPHANT DISKS 3-PACK SSDD $ 9 

Check or MO to CYNWYN . NY residents add sales tax. 

3% shipping, $2 minimum. SASE for catalog 
or call (212)567-8493 
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DODGE BALL 

The exciting, NEW idea in Arcade Games! 

Can You Dodge the Wildest Ball Around 
And Become the Artful Dodger? 

FOR THE 32K TRS-80 COLOR COMPUTER 
Cassette — $24.95 Disk — $29.95 

Send check or money order to 

Spencils Software 

709 Spencer St., Prattville, AL 36067 

Alabama residents add sales tax 

DODGE BALL — fun for all ages 
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NEW ! BT Companion 

Expansion Interface Units 

Basic Technology offers you 
the most features and best 
quality for the money! 
Compare these features: 



BT TRS-80 

COMPANION Multi-Pak 

• Power ON Indicator Light YES NO 

• Cold Start Reset YES NO 

• Gold Socket Connectors YES NO 

• Gold Edge Connector YES NO 

• Socketed Integrated Circuits YES NO 

• Manual Cartridge Selector Pushbutton Slide Switch 

• Keyboard/Program Selection YES YES 

• Cartridge ON Indicator YES NO 

• Extension Cable YES NO 

• Number of Expansion Slots 5 4 

• Warranty 180 days 90 days 

• User’s Manual w/schematics, 

parts layouts and parts lists YES NO 




BT Companion 
New Price . . $225.00 
BT-IOOO with 
built-in power 

supply $ 250.00 

With power supply 
and 8 k RAM $275.00 



Also for the Color Computer: 

BT-lOlO Parallel Printer Interface $ 79.95 

BT -1020 Real Time Clock/Calendar . . . $ 109.00 
BT 1030 Versatile Interface Port $ 69.95 



CALL TODAY 

or send for 
FREE BROCHURE! 



Add $5 s & h. Check, money order, VISA, MC (Account # and exp. date). COD charge $2 (req. certified 
check or M.O.). Mich, residents add 4% sales tax. 

hasic Dept. C P.O.Box 511 Ortonville, Ml 48462 
TECHNOLOGY (313) 627-6146 
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Basic environment because much of the 
really tricky work has already been done 
for you. 

There are other features which will be 
appreciated by assembly language pro- 
grammers: error handling, file handling, 
and including standard OS/9 definitions 
in your source code. There is an OS/9 file 
called OS9DEFS which includes 23 defini- 
tions that can be included in your source 
code at assembly time. Definitions in- 
clude such things as OS/9 system entry 
vectors, process status flags and I/O error 
codes. By including these definitions in 
your source program, they can become 
part of your program without your hav- 
ing to manually include them. Addition- 
ally, OS/9 lets you save your own defini- 
tions in the OS9DEFS file for inclusion in 
other programs. That way, if you have 
routines or definitions that are frequently 
used in your programming, you can write 
them once, include them in the OS9DEFS 
file and never have to code them again. 
Just include a use statement in your 
source code and the definition is auto- 
matically pulled into your code at assem- 
blytime. 

Documentation 

Radio Shack and Microware have 
done an outstanding job of document- 
ing OS/9. Documentation consists of 
four manuals, each packed chock-a- 
block with information. In the order you 
should read them the manuals are: 
“Getting Started With OS/9," (at 34 
pages); "OS/9 Commands," (at 139 
pages); "OS/9 Program Development," 
(at 137 pages); and "OS/9 Techinical In- 
formation," (at 178 pages). That's 524 
pages, the best documented package 
Radio Shack has produced. 

Information is arranged logically and 
large sections of reference material are 
arranged alphabetically. For example, in 
the "OS/9 Commands" manual, the first 
portion is designed for you to read 
through sequentially. It builds on previ- 
ously introduced concepts to give you an 
increasing knowledge of the workings of 
OS/9. The second half contains all the 
OS/9 commands, listed in alphabetical 
order for easy reference. The manuals 
are nicely printed, lie flat for easy refer- 
ence and are well-indexed. The technical 
manual contains all the information you 
need to interface with OS/9 when writ- 
ing assembly language programs. In the 
limited time that I have had available to 
work with the OS/9 package, there has 
not been a question that has come up 
that I have not been able to answer by re- 



ferring to the manuals. Updates for later 
releases and changes will be readily avail- 
able and equally as well done, I hope. 

Conclusion 

OS/9 is certainly a fine operating sys- 
tem, but there are a few things you 
should remember if you're considering 
buying it. First of all, it's somewhat com- 
plex to learn and use. You should have 
some knowledge of computers beyond 
that required to simply run "canned" 
software. Part of the strength of OS/9 is 
its facility as a programming tool. If you 
are interested in programming and have 
a fair grasp of basic computer concepts, 
you could certainly use OS/9. If you do 
not intend to do any programming, the 
system might not be of much use to you. 
Although complex, OS/9 is straightfor- 
ward, well organized and logical. While it 
cannot be learned completely overnight, 
it can be used fairly rapidly. I was pro- 
gramming with it after about 1 0 hours of 
familiarization. 

Major OS/9 Commands 

Attr Change file attributes 
Backup Make disk back-up 
Binex Convert binary to s-record 
Build Build a text file 
chd Change your working data 
directory 

chx Change your working execution 
directory 

Cmp Run the file comparison utility 
cobbler Make a bootstrap file 
copy Copy a file 
Date Display the system date and 
time 

Dcheck Check the disk data file 
structure 

Del Delete a file 
Deidir Delete a directory and all files 
in the directory 

Dir Display the file names in a 
directory 

Display Display converted characters 
Dsave Backs-up or copies all of the files 
in one or more directories 
Dump Produce a formatted display of 
the data contents of a file 
Echo Echoes entered text to the 
designated output device 
Format Initializes a disk 
Free Displays the number of available 
256 byte sectors on a device 
ident Displays header information 
from OS/9 memory modules 
Kill Aborts a process 

Link Locks a previously loaded module 

into memory and ties it into 
others 



List Displays the contents of a text 
file 

Load Loads modules into memory 
Login Provides log-in security 
Makdir Creates a new directory 
Mdir Displays the present module 
names in memory 

Merge Merges input files to one output 
path 

Mfree Displays free memory in 256 byte 
pages 

OS9Gen Creates and links OS/9bootfile 
Printerr Prints full error messages 
Procs Displays list of current running 
processes 

Pwd Shows path from root directory 
to current data directory 
Pxd Shows path from root directory 
to current execution directory 
Rename Gives a file a new name 
save Creates a new file 
Settime Sets the system date and time 
Setpr Changes CPU priority of a 
process 

sleep Puts a process to sleep for a 
specified length of time 
Tee Copies standard input to multiple 
outputs 

Tmode Displays or changes the 

operating parameters of the 
user's terminal 

Tsmon Supervises idle terminals and 
initiates log-in procedures 
Unlink Tells OS/9 that certain memory 
modules are no longer needed 
verify Checks header parity and CRC 
value 

Xmode Changes initialization 

parameters of certain devices 

— by Norman Garrett 



Basic Aid 

Eigen Systems 
P.O.Box 180006 
Austin, TX 787 18 

$34.95 ROMpak, $49.95 Disk 

Platinum Worksaver 

Platinum Software 
P.O.Box 833 
Plattsburgh, NY 12901 

$35 

OU ALREADY KNOW the Color 
Computer is the best home com- 
puter on the market. The Microsoft 
Basic, the excellent graphics, the power- 
ful 6809E, the tremendous third-party 
software and hardware support, the sup- 
porting magazines — what more could a 
computerist want? 
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INFLATION 



Co-Co Users! — 

Follett is deflating its prices on 
courseware created by The 
Learning Company for the 
Color Computer. 



(6 games), Bumble Plot™, (5 games), 
Juggle’s Rainbow™, (3 games), Moptown 
Parade™, (8 games), Moptown Hotel™, 

(3 games), and Magic Spells™, (2 games). 
To receive any or all of these programs 
for as little as $6.00 per game, fill out 
and return the order form or order by 




telephone toll free today. 
Follett’s software programs are 
affordable! 



For boys and girls preschool through 
thirteen, the six widely acclaimed 
programs include Bumble Games™ , 



According to the September issue of Soft' 
ware Merchandising, the Ai ‘ 



ware Merchandising, the Apple versions of 
these programs are on the best seller list.* 

this Last Mos on 
Month Month Chart 
Bumble Plot 5 5 2 

Bumble Games 6 7 2 

Juggle’s Rainbow 12 17 5 

They are now available exclusively from 
Foliett for the Color Computer. 



FOLLETT LIBRARY BOOK CO 

4506 Northwest Highwa|y, Crystal Lake. IL 60014 

TOLL-FREE 800-435-6170 

In Illinois. Hawaii Alaska 
call collect: 815-455-1100 



Best-selling software programs across'TTfe cbtfhtfy based on retaitf sales volume as surveyed by Eastman Publishing. 
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How about automatic line number- 
ing? Two-key entry of common Basic 
words? Changing or moving segments 
of programs without a lot of retyping? 

This review will cover two programs 
that offer those features and more — 
Basic Aid from Eigen Systems and the 
Platinum Worksaver from Platinum Soft- 
ware. For this review, I used the Basic Aid 
ROMpak Version 1 .2, and Version A-4 of 
the Worksaver. 

I call this type of program a program- 
mer's utility. I don't want to imply that 
you have to be an expert to use them, be- 
cause either program can help you as 
soon as you see the first ok prompt. 

The major feature of a programmer's 
utility is that it allows two-key entry of 
many Basic commands and functions. 
This is accomplished through a seldom 
used key (like the down arrow key), 
made to function as a control key. Since 
these programs use different keys for the 
control key, CTL will indicate the control 
key. So, when you see the sentence, 
"Type ctlh," it means to press the con- 
trol key (down arrow for Basic Aid, Clear 
or Break for Worksaver) and then type H . 



Documentation 

The Worksaver documentation con- 
sists of a 28-page manual with a four- 
page addendum containing corrections 
and additions for Version 4. Basic Aid's 
documentation is seven stapled pages. 
The instructions for both programs were 
adequate. Worksaver is a more complex 
program, so some of the instructions are 
difficult to understand until you have 
worked with the program awhile. 

Features 

Table 1 is a list of the major features of 
a programmer's utility. Rather than re- 
view each product separately, I will go 
down the list and cover each product's 
strengths and weaknesses. 

• Easy entry of keywords: Both pro- 
grams come with a keyboard overlay and 
allow two-key entry of a number of Basic 
commands and functions. 

Basic Aid uses the up arrow key as the 
control, so if you press the up arrow 
while pressing Y, the GOSUB command 
will be written on the screen. 



Worksaver covers more commands by 
using two control keys — the Clear key 
and the Break key. If you type clear g you 
will get GOSUB, while if you type Break G 
you will get GOTO. In this way, Work- 
saver covers 80 Basic keywords, while 
Basic Aid only covers 43 . 

With the keyboard overlays to show 
each key's function, the purchase of a 
programmer's utility is feasible even for 
the complete novice. Even if you're typ- 
ing in programs from The Color Com- 
puter Magazine, these programs will 
be a great help. 

• Both programs allow simple redefini- 
tion of most of the keys. For example, 
since I don't use trigonometry functions 
much, I redefined my comma key so that 
field is printed whenever I type ctl,. 

Worksaver also offers automatic ex- 
ecution of redefined commands. Instead 
of printing the command on the screen, 
you can execute it without pressing 
Enter. I put this to good use by defining 
the N key as DIR: ? FREE(O). In this way, 
all I have to do is type ctl n and I get the 
directory listing and the number of free 
granules. 



ME'N’. 



For Your TRS-80 Color Computer 

128 Full-time Audio Talk/Tutor Programs! 



You nay be able to 
reduce (jour taxes by 




incone 
spl itt ins 

tax shelter 




We’re Your Educational 
Software Source 



LANGUAGE ARTS 

Spelling 
Level 3-4 

(words in context with 
definitions and synonyms) 



(16 programs) 
(16 programs) 



(16 programs) 



Phonics 
English as a 
Second Language 

MATHEMATICS 

Levels 1-6 Numbers 
Basic Algebra 

SCIENCE & TECHNOLOGY 

Physics (16 programs) 



(32 programs) 

(16 programs) 
(16 programs) 




In Color, with Pictures and Text! 

All of our TRS-80 Color programs have easy to understand profes- 
sional announcer narration, not synthesized, robotic voices. All text 
is displayed in easy to read upper- and lower-case characters. Video 
clearly illustrates key concepts in each frame of the program. 

Only $4.40 per program. ($8.80 for 2, one on each side of a half-hour 
cassette). $59.00 for 16 programs (8 cassettes) in an album. Send for a 
catalog of over 1000 programs for Atari, TRS-80, Apple, etc. 

S Enter 83 on TeleResponse page 159 

For more information, or to order call: 




TOLL FREE 1-800-654-3871 

DORSETT 

Educational Systems, Inc. 

Box 1226, Norman, OK 73070 








Once the keys are defined to your 
satisfaction, you can save your changes 
to tape (or disk with the Worksaver). The 
Worksaver also saves the key definition 
table whenever you Save (or CSAVE) a 
Basic program. For example, you could 
write an adventure game, redefine some 
of the keys as "Go North," "Drink," and 
have two-key entry of these phrases 
whenever you load the game with the 
Worksaver. (If I had two-key entry of 
"Bash Troll" for "Keys Of The Wizard" 
I'd still be alive today.) 

• Both programs allow automatic line 
numbering (ALN), with user-definable 
starting points and increments. Basic Aid 
is easier to use this way. All you do is type 
CTL 6 to toggle ALN on and off. With 
Worksaver you have to reset the incre- 
ment to 0 (zero) to disable ALN. 

• Both programs let you merge pro- 
grams on cassette. The programs must 
be saved in ASCII (csave "program",a) 
format. 

• Worksaver's full screen editing func- 
tion lets you move the cursor anywhere 
on the screen for text entry. This makes 



Extended Basic's edit command obsolete 
and is a dream come true for anyone 
who has tried to edit a line like this: 

500 PLAY"T302L4DDAAGFED-CDEFGL2.AL4DDA 
AGFEDO 1 CDEFGL2. AL4ABAB-GAB-03 C" 

The syntax error hints that one of your 
O's is a zero! How can you fix it? With 
Color Basic you must retype the entire 
line. With Extended Basic's Edit com- 
mand you have to count the spaces to 
move over before you make the change. 
With Worksaver's full-screen editor, just 
List the line, move the cursor with the 
arrow keys over the offending zero, type 
the letter O, then press Enter; it's as sim- 
ple as that. 

• Worksaver is fully disk compatible, 
with easy to understand instructions for 
saving to disk. Being a ROMpak by trade, 
the Basic Aid that I used cannot be used 
with disk. Eigen Systems does sell a disk 
version of Basic Aid. 

• Memory used: The Worksaver uses 

over 2K of memory (2137 bytes to be 
exact), while Basic Aid uses a scant 227 
bytes. 



• Moving Program Segments: Anyone 
who's done much programming has run 
into the problem of moving blocks of 
code. After typing 70 lines of code you 
realize that some early routine should 
have been at the end of the program. 
Basic Aid and Worksaver both have fea- 
tures for manipulating blocks of program 
lines. Each is quite different from the 
other and both are very powerful for spe- 
cific tasks. 

Basic Aid lets you define a block of 
code (for example, Lines 10 to 100) and 
move it to a new location with new incre- 
ments (perhaps to Line 1000 with an in- 
crement of 10). It automatically takes 
care of any GOTOs and GOSUBs inside 
and outside the block being moved. This 
is a Move function, not a copy — once 
you have made the move, Lines 10 to 
100 are gone. 

Worksaver does not have a specific 
Move/Copy function, but lines can be 
manipulated by means of the full screen 
editor and auto-line numbering features. 
In order to move Lines 10 - 100 to Line 
1000, you would first set the auto-line 
number to an increment of 1 0. List Lines 
•10-100, move the cursor over the num- 
ber 1 in 10 and type 1000 . After hitting 
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TRS-80 Color Computer 

Color Computer Graphics, by Ron Clark, complete guide, loaded 
with instruction, how to make the most of video graphics, many 
complete programs. 128 pages. ISBN 0-86668-012-8 $9.95 

101 Color Computer Programming Tips & Tricks, by Ron Clark, learn 
by-doing instructions, hints, secrets, shortcuts, techniques, 

msiqhts. includes 101 ready-to-run programs. 128 pages. 

ISBN 0 86668-007-1 $7.95 

55 Color Computer Programs lor Home. School & Office, by Ron Clark, 
practical ready to run software with colorful graphics. 128 
pages. ISBN 0-86668-005-5. $9.95 

55 MORE Color Computer Programs for Home. School & Office, by Ron 

Clark, handy companion volume packed with different useful 
type-arid run software, 112 pages. ISBN 0-86668-008-X $9.95 

The Color Computer Songbook. by Ron Clark, 40 favorite pop. folk, 
classical, seasonal songs arranged for playing on the TRS-80 
Color Computer, type-and-run music programs. 96pages, 

ISBN 0-86668-01 1-X $7.95 

My Buttons Are Blue and Other Love Poems from the Digital Heart of An 
Electronic Computer, written by a TRS-80 Color Computer, edited by 
Ron Clark, for computer fans. 66 heartwarming poems. 

96 pages, ISBN 0-86668-013-6. $4.95 

TRS 80 Color Computer Program Writing Workbook, by Ron Clark, 96 
pages. 8 1/2x11, ISBN 0-86668-816-1. $4.95 
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Enter the cursor moves to the next line, 
automatically making it 1010. This con- 
tinues until all the lines are moved. 

As I said, both features are powerful, 
but do have some drawbacks. Basic Aid 
is fine if you want a segment moved and 
not copied. It's very convenient not to 
have to worry about GOSUBs and GO- 
TOs. It's a very clean move. 

Worksaver requires more care, but of- 
fers more versatility. Since the program 
doesn't eliminate the original line, and 
since the full-screen editor can be used to 
change more than just the line number, 



Table 1. Comparison Chart 



complex coding can be done in a short 
time. Take the following example : 

10 IF X<1 AND Y>5 THEN Z$ = CHR$(128):(30T0 
500 

20 IF X>1 AND Y<5 THEN Z$ = CHR$(129):G0T0 
500 

30 IF X=1 AND Y=5 THEN Z$=CHR$(130):GOTO 
500 

After typing Line 10, Lines 20 and 30 
can be typed with only four keystrokes 
each. Move the cursor over the 1 in Line 



1 0 and type 2. Move the cursor to the < 
and type >. Move to the > and type <. 
Move to the 8 in 1 28 and type 9. Finally, 
push Enter and Line 20 is complete. Line 
30 can be similarly entered. 

• Both programs can be turned off and 
back on again as the occasion requires. 

Other Features 

Worksaver has one major feature I 
haven't seen in any program of this type. 
They call it dynamic editing, and it in- 
volves changing a Basic program without 
losing data. For example, enter the fol- 
lowing program (exactly, including the 
error): 

10 FORX= 1 TO 5 
20 INPUT A$(X):NEXTX 
30 FORX= 1 TO 5 
40 PRIINT A$(X):NEXTX 

Run the program (type anything to an- 
swer the input prompts); then edit Line 
40 and correct the error. Now, from the 
command mode, type print a$( 2 ); natur- 
ally, the data is gone. Not so with Work- 
saver's dynamic editing. Even after edit- 
ing Line 40, your data still exists. Just type 



Feature 


Basic Aid 


Worksaver 


Easy Keyword Entry 


Y 


Y 


Redefine Keys 


Y 


Y 


Save Redefined Keys 


Y 


Y 


# of Basic Words Defined 


43 


80 


Automatic Line Numbering 


Y 


Y 


Cassette Merge 


Y 


Y 


FullScreen Editing 


N 


Y 


Dynamic Editing 


N 


Y 


Disk Compatible 


N 


Y 


Move Program Segments 


Y 


Y 


On/OffSwitch 


Y 


Y 


Memory Used 


227 bytes 


2137 bytes 


Cost 


$34.95 


$35.00 



All software in stock will be shipped within 24 hours. Plus we will give 
you 20% OFF if you order 4 or more software packages. 1 5% OFF on 3 
and 10% discount on 2 software packages. 

Listed below is a partial list of the programs we carry. We carry only what we think is the best 
available software. Prices are listed (tape/disk). We guarantee satisfaction. If any product does 
not perform as advertised return it, and we will gladly exchange it for you. Please note that we 
carry some items not on this price list. 



Astro Blast (Mark Data) 


17.47/20.97 


Devil Assault (Tom Mix) 


. . 27.95/30.95 


Moon Shuttle (Datasoft) 


31.95 


Balloon Attack (Computer Shack) 


21.95/23.95 


Disk To (Tom Mix) 


17.95 


Ms. Gobbler (Spectral) 


24.95/28.95 


Bloc Head (Computerware) 


26.95/29.95 


Doodle Bug (Computerware) 


. . 26.95/29 95 


Mudpies (Computer Shack) 


27.95/29.95 


Cashman (Computer Shack) 


27.95/29.95 


Dunkey Monkey (Intelltronlcs) 


...9.95/12.95 


Ninja Warrior (Programmers 6uild). . 


14.98 


Catalyst (Computer Shack) 


21.95/23.95 


Editor Assembler (Micro Works) . . . . 


. . 89.95/99.95 


Omni Clone (Prickly Pear) 


29.95 


Chopper Strike (Computer Shack) 


27.95/29.95 


Elite Calc (Elite Software) 


. . 49.75/49.75 


Outhouse (Computer Shack) 


27.95/29.95 


Color Demon Seed (Computer Shack) — 


27.95/29.95 


Frog (Tom Mix) 


. 27.95/30.95 


Pacdroids (Programmers Guild) 


9.98 


Color DFT (Computer Shack) 


25.95/25.95 


Galagon (Spectral) 


. 24.95/28.95 


Phantom Slayer (Med Systems) 


11.97 


Color Fury (Computer Shack) 


27.95/29.95 


Ghost Gobbler (Spectral) 


. . 24.95/28.95 


Planet Invasion (Spectal Assoc.) . . . . 


. 24.95/28.95 


Colorcom/E (Spectrum) 


44.95/44.95 


Glaxxons (Mark Data) 


,17.47/20.97 


Pooyan (Datasoft) 


26.20 


Colorpede (Intracolor) 


29.95/34.95 


Intercept 4 (Computer Shack) 


. . 27.95/29.95 


Robottack (Intracolor) 


. 24.95/27.95 


Color Graphics Editor (Softsector) 


9.98 


Invaders Revenge (Med Systems) . 


11.97 


Shark Treasure (Computerware) — 


.17.95/22.95 


Color Time Bandit (Computer Shack). . . 


27.95/29.95 


Junior s Revenge (Computerware). 


.28.95/31.95 


Speak Up (Classical) 


19.95 


Color Stronghold (Computer Shack) . . . 


27.95/29.95 


King (Tom Mix) 


. . 28 95/29 95 


Tape To Disk (Tom Mix) 


17.95 


Color Billing System (Computer Shack) 


29.95 


Lancer (Spectral Assoc.). . . . 


. 24.95/28.95 


Telewriter 64 (Cognitec) 


. 44.95/49.95 


Composer (Speech Systems) 


19.95/25.95 


Lunar Rover Patrol (Spectral Assoc ). 


. . 24.95/28.95 


Trapfall (Tom Mix) 


. . 27.95/30.95 


Cosmic Clones (Mark Data) 


19.95/24.95 


Monkey Kong (Med Systems) 


11.97 


Zap (Computer Shack) 


29.95 


Cubix (Spectral Associates) 


24.98/28.98 






Zaxxon (Data Soft) 


. . 39.95/39.95 




1691 Eason • Pontiac, Michigan 48054 

Info: (313) 673-8700 • Orders: CALL TOLL FREE (800) 392-8881 
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Master Charge and VISA OK. Please add $3.00 for shipping in the U.SA - $5.00 for Canada. 
Dealers Inquires Invited. 
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goto 30 and the program will continue 
with your data intact. 

This function has its limitations, 
though. If the error occurs in a subrou- 
tine, you may have a tough time figuring 
where to re-enter the program without 
getting an RG error.lf you're careful, this 
feature can be worth the price of the pro- 
gram. 

Conclusions 

Worksaver offers some unique fea- 
tures that are hard to pass up. It is a com- 
plex program, however, and tough to 
learn. If you press the wrong keys, you 
may spend quite a while looking through 
the manual trying to get out of the mode 
you're in. Save your programs frequently 
while using the Worksaver (this should 
be done anyway). 

All in all, I found the Worksaver to be 
a true worksaver, and use it whenever I 
have more than just a few lines of code 
to enter. 

Basic Aid, on the other hand, is easier 
to use than the Worksaver. Its limited 
memory use makes it an excellent choice 
fora 16K cassette user. 

No matter which you choose, your fin- 
gers will thank you. — by John Boats 



RS-232 Three-Way 
Switcher 

DSL Computer Products 
13726 W. Warren 
Dearborn, Ml 481 26 
(313)582-8930 

$39.95 (three-way), $29.95 (two-way) 

AVE YOU HAD IT with having to 
unplug the darn printer every time 
you want to use your modem? I decided 
to do something about it one day when 
I broke one of the jacks on my cable. My 
search for a better way led to the RS- 
232 Switcher. 

The Switcher comes in three models, 
one with a pair of RS-232 positions, one 
with a pair of RS-232 positions and an 
"off" position, and another with three 
RS-232 positions. I tried the three posi- 
tion switch, as I had three potential uses 
for the RS-232 port. 

Physically, the Switcher is nothing 
more than a box with three four-pin 
female connectors on the back, a short 
cable with a four-pin male connector, 
and a three-position switch on the front, 
marked simply "1,2, and 3." The idea is 



to plug the Switcher into your RS-232 
port, then plug your accessories into the 
Switcher as if it were the back of your 
Color Computer. Then the RS-232 out- 
put/input of your Color Computer is 
routed to whichever of the three Switch- 
er lines is set. 

In my case, I connected the three ports 
of the switcher as follows: the standard 
serial interface to my DMP-120 printer, 
another standard serial interface to my 
Radio Shack Modem I, and a parallel in- 
terface to my DMP-120 printer using a 
Botek Instruments CCP-1 Serial to Paral- 
lel Converter. 

I use the standard serial interface to 
print graphics on my printer (besides 
switching the Switcher to the proper 
selection, I also have to set a DIP switch 
on the printer to set it to serial mode). 
When printing text of any kind, I route 
the output through the parallel converter. 
That cuts my throughput time by 50-65 
percent over standard serial printing. 
When using my modem, I simply switch 
to the modem setting and I'm in busi- 
ness. 

The Switcher is easy to set up and use. 
All you really need to do is keep track of 
the switch positions you have set up. To 
do that, I used an embosser (labelmaker) 





FOR YOUNG CHILDREN 




The Best Selling Program for Young Children 
Mow Available for: TR5-80 Color Computer- 
16K disk or cassette and TR5-80 Models 
l-32Kdiskor 16K cassette 



Mine fun educational games for children ages Z x k to 6 



"Sisssasr 



. coontarpoini 



"l 

counterpoint software, inc. % 

4005 West Sixty-Fifth Street 
Minneapolis. Minnesota 55435 



'UeA.l 

J Circle one: 
Model I Disk 
Model III Disk 



Please rush me Early Games for Young Children 



\ 

\ 



Color Computer Disk Model I 
Color Computer Cassette 



I Cassette 



Phone Orders: 800-328-1223 
Minnesota: 612-926-7888 

Educators Endorse: “Early Carnes can help children 
learn new concepts, information and skills, and 
also introduces them to the joys and benefits of 
home computers." 

Peter Clark, Faculty 
Institute of Child Development 
University of Minnesota 

Mo adult supervision required. The Picture Menu 
gives children control. They can: 
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State 



Zip 



□ My check for 529.95 is enclosed (Minnesota residents add 6% sales tax). 

□ Charge to VI5A □ Charge to Mastercard 
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Acct. Mo. 



Expiration Date 
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Match Numbers 
Count Colorful 
Blocks 

■ Add Stacks of 
Blocks 

• Subtract Stacks 
of Blocks 
• Draw and 
Save 
Colorful 
Pictures 



• Match Letters 
■ Learn the Alphabet 

• Spell their Names 

• Compare Shapes 
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and slapped the settings to the side of 
the switcher. 

The Switcher is made of heavy-duty 
plastic and has a large switch selector. Its 
dimensions are roughly 3-by-5-by-1 V 2 
inches, so it's easy to tuck out of the way 
yet still have handy. 

Of all the hardware accessories I have, 
the Switcher has saved me the most time 
and effort. For the price, it's well worth 
the money, not to mention the wear and 
tear on your jacks and cables caused by 
constant plugging and unplugging. Give 
yourself, and your system, a break, and 
give the Switcher a try. 

— by Norman Garrett 



Pro Color 
File Enhanced 

Derringer Software 
Box 5300 

Florence, SC 29502 
(803)665-5676 

$79.95 disk, 32K 

RO COLOR FILE Enhanced performs 
not only as a database but as a cal- 
culator, sort of a modified spreadsheet 
program. Despite its documentation 
problems, it's a nice tool for detailed bill- 
ing, inventories and general accounting. 

The major difference between Pro 
Color File Enhanced (PCFE) and the old 
Pro Color File is that PCFE has eight re- 
port formats instead of five, a new sum- 
mary feature for reports, a new posting 
routine, and a much improved labelling 
routine. 

I used PCFE for my commercial pho- 
tography billing. The set-up required 40 
fields (I could have used all 60 available 
to me) within three segments. PCFE pro- 
vides four segments, each containing 1 5 
fields. I set some of the fields to standard 
items such as name, address, date and 
phone. However, the rest of my required 
categories were film, processing, Polar- 
oid, mileage, shot description, process- 
ing, modeling fees, and so on. Many 
fields were duplicated, since I have to 
itemize types of film, Polaroid, and proc- 
essing. Looking at my set-up, it seems re- 
petitive in places, but every field is pain- 
fully necessary. 

After you format fields and set up the 
data screen you can set equations into 



your formats. I set them up to figure my 
costs for film, traveling, and processing. 
The big equations figured out the total 
shooting bill. Setting the equations was 
the easiest section to do. 

Some of PCFE's features include the 
ability to copy the program, 1020 bytes 
available for record data, easy editing, col- 
ors for making data entry simple and 
obvious, eight report formats, label print- 
ing, various indexing and sorting func- 
tions (including the ability to sort on 
three fields), summary reporting and 
printing, account posting, and the use of 
a limited menu to save time when select- 
ing different functions of the program. 
Other features include subtle refine- 
ments of the capabilities mentioned 
above. 

Putting some initial problems aside for 
the moment, I found this program easy 
to work with, especially when entering 
data and getting print-outs. Some func- 
tions that exist but I haven't yet tried out 
include searching for fields based on 
numeric values, and/or selection options, 
and killing an entire format. My needs 
aren't nearly this great — yet. 

The program is great, once it's up and 
running. The manual is not very helpful, 
especially when you're trying to set up 
data segments and data screens. The 
manual is not written in a truly step-by- 
step fashion nor does it offer pictures of 
actual screen displays. Granted, that 
would require more work on the man- 
ufacturers part, but I feel it would be cru- 
cial for beginners. 

A detailed step-by-step sample pro- 
gram, showing actual keystrokes and re- 
sults would have saved all kinds of time. 
The beginning of the manual tells you to 
make a backup of the program disk. One 
problem : it doesn't tell you how. To add 
ten lines of explanation would save be- 
ginners the trouble of searching their 
Radio Shack manuals for the procedure. 
There are numerous typos, some gram- 
matical errors, and even a page missing. 
And curiously, some sections are more 
detailed than others. For instance, sec- 
tion D 5.3, "Moving The Display Win- 
dow," explains how to move the cursor 
while editing report formats. Unfortu- 
nately, it doesn't tell you that the cursor 
disappears; it does tell you to type " R" to 
resume editing. So you lose the cursor 
and, momentarily, panic. Hit "R" and 
there it is again, but the manual doesn't 
tell you what is going to happen or even 
why. Granted, this is a small point but the 
manual is full of similar glitches. 




Fortunately, when I had troubles, I 
called author Dennis Derringer, who was 
helpful and polite. If you start getting 
frustrated, don't quit, call Dennis. 

My real beef concerns report format- 
ting. My billing set-up requires 40 fields, 
and most are quite different in structure 
and length. PCFE does not seem to allow 
a report format for the printer or screen 
to be arranged to accommodate even 
half of the required 40 fields. I got 
around this by printing the bill while in 
the data entry mode. The program al- 
lows only two lines to set up report for- 
mats, which just isn't enough if you have 
a lot of fields that all have to be printed 
in an unusual manner. 

The drawbacks are not nearly enough 
to keep me from highly recommending 
PCFE, though. It's full of functions a small 
to medium-sized business can use. Those 
businesses may have no trouble with re- 
port formatting and printing. If they do 
they ought to persevere — the program 
is worth it. 

— by Charley Freiberg 



Spell-Rite 

Eigen Systems 
Box 180006 
Austin, TX 787 18 

$59.95 

C ONSIDERING the fact that spelling 
checkers are usually notoriously 
slow, and that cassette searches are even 
slower, I was curious why anyone would 
develop a program like Spell-Rite. 

Spell-Rite and its 19-page manual is 
on a "protected" tape, so you cannot 
simply CLOADM it and save it back. 
Eigen Systems gives you two tapes with 
a copy of the program on each, but a 
program like this should not be pro- 
tected as it is because of the large 
amount of use that could be expected 
from it. There is a bonus program on the 
back side of the tape: an indexing pro- 
gram that allows you to generate index 
files for your documents. 

To use Spell-Rite, type CLOADM, and 
watch it auto-load. After a minute you 
will see the main menu, and then you 
may load a dictionary. Spell-Rite comes 
with a 10,000-word dictionary; you can 
create your own dictionary and add 
words to any existing dictionary, too. The 
10,000-word list only took about two 
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Tandon — Siemens - 

40 or 80 Tracks 






Super Sale on New Disk Drives 

Starting at $169.00 

Remex — MPI — Teac — Shugart — Tabor 

■ Single or Dual Head — New 3 Vi " Drivette™ 

Our Disk Drives Are Capable Of Single And Dual Density Operation 

The Newest Technology Major Brands Capable Of Operating On: 

RADIO SHACK' — HEATH/ZENITH 2 — APPLEVFRANKLIN 4 
IBM/PC-TEXAS INSTRUMENTS 6 & MOST OTHER COMPUTERS 

Drive a Hard Bargain!!™ — 5 M.B.-12 M.B. Hard Drive, Everything You Need 

Complete Systems from $999.95 

Diskette Breakthrough — 10 Pack in Library Case — 

Since We Are Always Finding Ways To Save You Money, 

Please Call For Our Most Current Pricing. 

TOLL FREE ORDERING GENERAL AND TECHNICAL 

1-800-343-8841 1-617-872-9090 

Model l/lll/IV Drives (0 12 3) starting at $1 69.00 

Color Computer Drive (0 12 3) $ Call Toll Free 

Apple/Franklin Compatible Add-On Drives with Case & Cables . . . f$219.95 

Apple/Franklin Compatible Drives Complete with Controller . . . ,\$259.95 

Model l/lll/IV Memory Upgrade $ Call Toll Free 

Printers — Daisywheel/Dot Matrix $ Call Toll Free 

Diskettes in Library Cases $J£r9$ New low Price 

Cases and Power Supplies — (Single-Dual-1/2 Height) starting at $ 44.95 

Printer Buffers 8K to 512K starting at $143.95 

Percom Double Density Controller (Model I) $ Call Toll Free 

Holmes Model l/lll Speed-up Mod-VID/80 starting at $90.00 

Gold Fingered Edge Card Extenders starting at $13.00 

Cables — Printer/Disk Drive starting at $23.00 

DOSPLUS $ Special Prices 

Repair Services Now Offered — Fast Turn-a-Round $ Call Toll Free 

Warranty on Disk Drives — 6 Months — Extended Warranty $ Call Toll Free 

SOFTWARE SUPPORT, INC. 

One Edgell Road, Framingham, MA 01701 (617) 872-9090 

Hours: Mon. thru Fri. 9:30 am to 5:30 (E.S.T.) Sat. 10 am to 4:30 pm 



Dealer inquiries invited. 

1 ™ TANDY CORPORATION 

2 ™ ZENITH DATA SYSTEMS 

3 ™ APPLE COMPUTER CORP. 

4 ™ FRANKLIN COMPUTER, INC. 

5 ™ IBM CORPORATION 

6 ™ TEXAS INSTRUMENTS 
© Copyright 1983 

;3Aiua >isia S3Aiua >isia S3Aiua MSia S3Aiua Msia ssaiuo >isia s3Aiua MSia s3Aiua >isia ssaiuo Nsia 

& Enter 85 on TeleResponse page 159 



TERMS: 

M.C./Visa/Amex and personal 
checks accepted at no extra charge. 
C.O.D., please add $3.00. 

Shipping: Please call for amount. 

Not responsible for typographical errors. 



Canada 

MICRO R.G.S. INC. 

751, CARRE VICTORIA, SUITE 403 
MONTREAL, QUEBEC, CANADA, H2Y 2J3 

Regular Tel. (514) 845-1534 
Canadian Toll Free 800-361-5155 
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minutes to load because Eigen Systems 
uses a compression algorithm to pack a 
lot of words into a small space in mem- 
ory. 

After the list is loaded, you tell Spell- 
Rite to verify your document. Spell-Rite 
reads ASCII text files directly from tape. 
This means it will work with any word 
processor that produces an ASCII output 
file, such as Telewriter and Super Color 
Writer II. Because Spell-Rite reads one 
line at a time from the tape, there is no 
limit to the size of the text file that you 
may proofread. 

There are two verify modes, manual 
and automatic. The manual mode stops 
the search every time a suspect word is 
found, and asks you whether you wish to 
add that word to the dictionary. The au- 
tomatic mode adds all suspect words to 
the dictionary without prompting you. 
Spell-Rite will allow you to get a printed 
list of the "bad" words if you have a 
printer, too. 

You can create lists three ways. You 
can type words into the program (slow). 
You can also read a file from a tape (but 
have to put words there first). The best 
and fastest way to create a dictionary 
seems to be to make a fake document 
containing only the words you want to 
add, and use the auto-verify mode to add 
them to the dictionary. But unfortu- 
nately, Spell-Rite is lacking in the per- 
formance department. 

Spell-Rite's biggest handicap is its 
small dictionary. Ten thousand words 
sounds like a lot, but it's only about five 
percent of the words in the English lan- 
guage. Because of its small size, Spell- 
Rite's dictionary flags such common 
words as "done" and "between" as 
being questionable. There's room for 
400 extra words in the standard Spell- 
Rite dictionary, so you won't be able to 
add enough extra words to make up 
much of the deficit, unless you're already 
an exceptional speller. 

Spell-Rite is also rather slow. It takes 
about four minutes to verify a 300 word 
document, not really much faster than 
manual checking. Spell-Rite also has no 
provision for correcting documents. 

A bug that may limit its usefulness is 
Spell-Rite's habit of crashing when it sees 
a "word" with no alphabetic characters, 
for example a dash. Because of this, you 
cannot use the or " = " symbols to 
underline headings. That's okay if you 
have a smart printer with underlining; 



unfortunately, not all of us are so well en- 
dowed. 

Eigen Systems is to be commended for 
a game attempt at helping beleaguered 
cassette users, but $59.95 will buy one 
heck of a good dictionary. 

— by Chris Erving 

(Eigen now says the problem of Spell-Rite 
crashing when a "word" without alpha- 
betic characters is entered has been fixed 
in those versions of the program cur- 
rently available. — Ed.) 



VIP Terminal 

Softlaw 

9072 Lyndale Avenue South 
Minneapolis, Minnesota 55420 
(612)881-2777 

ROMpak and cassette, 1 6K 
disk, 32K 
$49.95 (all) 

T HE COMMUNICATIONS capabilities 
of VIP Terminal, formerly Super 
Color Terminal 3.0, allow you to set up 
a communications link to practically any 
computer. With a minimum of effort, I 
have done file uploading and download- 
ing via links to a PDP 1 1/70, an IBM 3081, 
an IBM 4341 , an IBM PC, a TRS-80 Model 
III, an Apple lie, and CompuServe. As 
long as you research how to set it up, 
practically any configuration is possible 
when communicating with another com- 
puter using VIPTerminal. 

VIP Terminal has a feature called 
"memory sense." Upon loading the pro- 
gram (I have the disk version), memory 
sense dynamically determines the amount 
of memory available and sets itself up ac- 
cordingly, with the largest buffer size 
possible. When it is ready, pressing any 
key will display the menu, which gives 
you the following options: communica- 
tions, changing communications param- 
eters, clear buffer, load a tape, create a 
tape, display a buffer, print buffer con- 
tents, maintain KSMs (keystroke multi- 
pliers), disk commands, and exit to Basic. 
Remember to determine the settings you 
need before you run the program, and to 
have your modem properly connected 
via the RS-232C port. There is no online 
help available, so be thoroughly familiar 
with the documentation in order to be 
able to make full use of all of the VIP fea- 
tures. 



In general, the menu order is not the 
order in which you should conduct your 
communications. Let's go through a 
sample communications session and dis- 
cover the numerous features as we go. 

After the memory sense automatically 
sets the maximum buffer possible for 
your computer the main menu appears. 
The buffer that has been set up may be 
used to save part or all of your terminal 
session and can later be copied to disk or 
tape. By the same token, the buffer can 
be loaded from disk or tape before set- 
ting up communications. 

For this sample session, let's communi- 
cate with CompuServe, upload a file, 
clear the buffer and download a mes- 
sage from E-Mail. First, we want to make 
sure we are completely set up, so as not 
to waste valuable on-line connect time. 
First, we will select from the menu option 
eight "maintain KSMs," or "keystroke 
multipliers." These handy devices allow 
you to program key(s) so an entire line of 
characters can be transmitted with one 
tap of the finger. 

Up to 10 KSMs may be created and 
each may consist of up to 2 50 characters. 
KSMs are used when in communication 
mode by pressing the Clear key and any 
number key (0-9). To create new KSMs, 
option eight, "maintain KSMs," is used. 
First, we enter "E" (for edit) to create a 
new KSM. We are given the option of 
whether or not to include a carriage re- 
turn at the end of our KSM. While in this 
mode, we may want one KSM to log on, 
a second to give our password, and 
others containing various CompuServe 
commands. When we have finished cre- 
ating our KSMs, we can save them to 
tape using an "S" command. If we have 
previously saved KSMs on tape, we can 
load them using the "L" command. To 
save KSMs to disk or load them from 
disk, we must exit the KSM option (using 
the Break key) and return to the main 
menu. 

To save our KSMs to disk and load the 
file we want to upload to CompuServe, 
we select function nine "disk commands, " 
from the main menu. All disk functions 
are carried out from this option. Gener- 
ally, most functions that can be invoked 
from immediate mode can be invoked 
from the disk commands option. The 
disk commands available are: KS (KSM 
save), KL (KSM load), Dl (display disk di- 
rectory), DS (save buffer to disk), DL(load 

) to page 154 
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Have you heard about our new 

EDUCATIONAL SOFTWARE 

PLAN 

for 

public and private schools? 



The complete set of quality instructional software that was formerly avail- 
able only at retail prices is now available to schools at less than 5 % of its current 
retail price. 

This award-winning software is either now or soon will be running on Apple, 
Atari, Commodore 64, IBM-PC, TRS-80, and TRS-80 Color Computers. 

Over 250 disks containing more than 1200 lessons for grades K-9 in reading, 
spelling, language arts, math, problem solving, math games, reading games, and 
programs for young learners are included in the plan. 

THE PLAN ^Schools join together to form a cost-saving consortium of 50 or 
more members. One school or eductional agency acts as Host. The Host will 
receive a master set of program disks and manuals. The consortium will be 
licensed to make as many copies of the masters as member schools need for their 
various computers. 

THE BENEFITS “■Consortium schools will automatically receive updates 
and new program releases at no increase in membership fee. There will be no 
shortage of quality software for the most popular computers. 





Max Jerman 



THE COST ^Only $250 per school per year. There is an additional start-up 
cost of $250 per school to cover initial expenses. Licenses for specific computers 
are available to large consortia or states at reduced cost. 




BERTAMAX INC. 

Max Jerman, Ph.D., 
President 



ACT NOW “—Form your own consor- 
tium and contact us. Contact us directly for 
the names of interested schools in your area. 

At Last — A Software Solution 



I BERTAMAX INC. 




©1983, Bertamax, Inc. • 3647 Stone Way North • Seattle, WA 98103 • (206)547-4056 
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Explore the ancient, mystical tomb of the great Pharoah. Find the magical keys which lead you to unbelievable 
treasures as you out maneuver the creatures that slither and swarm about you. Super fast arcade action— this one 
will knock your socks off with 16 screens of incredible color and sound. $24.95 cassette, $27.95 disc. Requires 32K. 



TIME FIGHTER 

Pilot your MD-64 fighter through a hazardous time tunnel. Your mission is to destroy 
the dreaded Time Guardian who threatens the natural order of the universe. In order 
to reach this menace you must fight aerial dangers from strange and different time 
zones. $24.95 cassette, $27.95 disc. Requires 16K. 



Mark Data Products 



24001 Alicia Pkwy., #207, Mission Viejo, CA 92691 • (714) 768-1551 

ORDERING INFORMATION: Phone your order for speedy delivery. Use your MasterCard or Visa. We also accept checks and money orders. ALL ORDERS: Please add $2.00 shipping and 
handling in the continental U.S. All others, add air shipping and $3,00 handling. California residents add 6% sales tax. Foreign orders please remit U.S. funds. Distributed in Canada by Kelly 
Software Distributors. SOFTWARE AUTHORS: Contact us forexciting marketing details. 
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P SENSATIONAL! \ 
GRAPHIC ADVENTURES 

DISC NOT REQUIRED ' - 
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32K Required 



SEA QUEST 



SHENANIGANS 

From the heart of the city to lonely 
wilderness. An action filled journey to 
find the fabled pot of gold at the end of 
the rainbow. The first of our sensa- 
tional new hi-res graphic adventures. 
You’ll love it! 



J ■ n on » hilltop, fl path slopes 
to a beach below. 

Obvious directions North. 

I see » storage shed. 



Get your shark repellant and scuba 
tanks ready to search for treasures 
under the sea. You’ll run into a pirate, a 
mermaid and hungry sharks in this 
colorful and unique adventure. 
Outstanding! 



on » warn tropical beach. 
Obvious directions: Up. 

I see » arass shack, sand, a 
lot of ocean. 



I see- Trader Jack the 
beachcomber, sone keys on a 
chain, a machete. 

Trader Jack says - Hi Bub' 6oi 
somethin' to trade 7 
, OK , M 



ial photographs taken from Calixto Island screen 



BLACK SANCTUM 

New Hi-Res Version 

Encounter the forces of black magic 
as you roam around an old 18th 
century monastery. You’ll see all the 
evil locations in this spooky adventure 
in full hi-res detail. If you enjoy 
suspense, this one’s for you. 



CALIXTO ISLAND 

New Hi-Res Version 

A challenging puzzle with an 
occasional twist of humor. You’ll visit a 
secret laboratory, a Mayan pyramid 
and you’ll meet crazy Trader Jack— all 
in living color and exciting detail. 
A classic! 
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OTHER GREAT GAMES FROM MARK DATA 

BUMPERS 

Tension mounts as you wildly race through a hidden obstacle course. Barrier walls are invisible until you bump into them and you must proceed 
cautiously as each dead end has a hidden booby trap. Especially exciting when two players compete simultaneously. 

COSMIC CLONES 

Clonial Warriors, Super-Klones, Double Bombs and “the Death Layer” relentlessly challenge the most skillful player in this unique, fast action game. This 
is one of our favorites. 

GLAXXONS 

Pit your playing skill against squadrons of swooping, diving spacecraft. Fast and furious with seven selectable skill levels and automatic game 
•acceleration. . .guaranteed to blister your joystick finger. 

EL BANDITO 

El Bandito has to be a crafty little hombre to stay alive as he loots the local countryside. Escape into a tunnel to avoid that angry spider. . .race around the 
corner towards your lair. Two players may compete simultaneously in this unusual game. 




Mark Data Products 



24001 Alicia Pkwy., #207, Mission Viejo, CA 92691 • (714) 768-1551 

ORDERING INFORMATION: Phone your order for speedy delivery, use your MasterCard or Visa. We also accept checks and money orders. ALL ORDERS: Please add $2.00 shipping and 
handling in the continental U.S. All others, add air shipping and $3.00 handling. California residents add 6% sales tax. Foreign orders please remit U.S. funds. Distributed In Canada by Kelly 
Software Distributors. SOFTWARE AUTHORS: Contact us for exciting marketing details. 
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BLACKJACKPRO 



A computer assisted learning tool 
to condition you to make 
the right play effortlessly 
and beat the house. 

Read about BLACKJACKPRO on page 74 

Bl ACKJ ACKPRO is « trademark of Skillwaro Corporation 



SKILLWARE 
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i from page 150 

a file from disk into the buffer), DR (re- 
name a disk file), and DK (kill disk file). Hit 
the Break key to return to the main 
menu. 

Several notes are in order here. VIP 
Terminal will load only ASCII files from 
disk. Tokenized Basic files cannot be 
loaded, nor can binary files. To load a 
Basic file, you first need to save it with the 
ASCII option. To load or save a binary file, 
you need to have it on cassette, as the 
tape load and save feature includes a bi- 
nary option. The documentation does 
not explain why this is the case but I tried 
it and can verify that only ASCII files can 
be successfully loaded from disk. 

VIP Terminal will support more than 
one disk drive and also has the ability to 
allow you to append disk files to each 
other within the capacity of the buffer. 
The "append" feature can save you time 
if you are uploading multiple files, al- 
though I would not recommend it unless 
the files are headed for the same destina- 
tion. 

After loading your file, it's a good idea 
to look at the buffer. To do that, return 
to the main menu and select option six, 
"display a buffer." Note that the buffer 
display uses graphics text (if it is turned 
on) as per the parameters set in option 
two (more about this later). When we 
have viewed our file in the buffer, we re- 
turn to the main menu. If we want to 
print the buffer contents at this point, 
we'd select option seven. Option seven 
sends another menu that asks us to select 
a data transmission rate and decide 
whether or not we want linefeeds sent. 
Once we have made these decisions, the 
entire buffer will print. If you want to in- 
terrupt printing, press the space bar — 
pressing any key will resume printing. 
Pressing the Break key stops printing and 
displays the main menu. 

One difficulty in using the printer is 
that it uses the same RS-232C cable the 
modem uses. Generally, both devices 
cannot be connected at the same time. 
If you're going to use the print feature a 
lot, consider buying an RS-232 switch- 
box which will allow you to have both the 
printer and the modem connected. You 
simply select with a switch which one will 
be operational at any given time. 

The print facility can also be used while 
viewing the buffer and will print a selected 
portion of same. To stop the printer, 
press the Break key and the program will 
return you to the main menu. 

One drawback of VIP Terminal is the 
inability to edit the buffer contents. 
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Some type of editor would be a nice en- 
hancement. 



Communicate! 

Now that the file is loaded, we're 
all set to establish communications. 
From the main menu, select option two, 
"changing communications parame- 
ters." This option lets us set up our com- 
munications configuration before actu- 
ally going on-line. The parameters that 
can be selected include the display pa- 
rameters and the RS-232C protocol pa- 
rameters. 

The display parameters include line 
length and display color. Length options 
are 32 x 16,51 x 21, 51 x 24, 64 x 21, 
64 x 24, 85 x 2 1 and 85 x 24. All displays 
(except 32 x 1 6) include graphically gen- 
erated lowercase characters with de- 
scenders. When using the 64-character 
line, a narrow or wide character set may 
be selected. On a television display, the 
64-character line is barely readable. The 
85-character line is not readable. The 85- 
character line is good for viewing for- 
mats, however, when you have created 
a file and want to see how it will look on 
a standard 80-character screen. The 51- 
character option is very pleasing and is 
the default option. I tried using a compo- 
site monitor and found the 64-character 
display to be readable. The 85-character 
display was barely readable and unac- 
ceptable for normal work. 

The color options are black on green, 
black on white, green on a dark back- 
ground or white on a dark background. 
On my black and white television, I used 
black on white most of the time because 
it seemed to be the most pleasing display 
and had the best resolution for using the 
64- and 85-character lines. Black on 
green worked well on a color television. 

The documentation points out that 
using the 32 x 16 display requires no 
graphics and, hence, works faster. I tried 
this and found a noticeable difference in 
scrolling when using the 32 x 16 display 
at 1 200 baud. I detected very little differ- 
ence at 300 baud. Color display options 
are actually invoked from the communi- 
cate mode (main menu option number 
one) rather than from option two. All line 
lengths are set from option two. 

Option two also gives you the oppor- 
tunity to set your own RS-232 protocol 
parameters. This is especially important if 
you are communicating with another 
computer. The defaults are set up to 



allow communications with most bulle- 
tin boards and databases such as Com- 
puServe. 

Baud options are 1 1 0, 300, 600, 1 200, 
2400, 4800 and 9600. The menu gives 
you the option to select your baud from 
these choices only. 

Word length can be set at seven or 
eight bits; parity at odd, even or none; 
and stop bits from one to nine. Your 
mode can be set to half duplex, full du- 
plex or echoplex (used at 600 baud or 
less). You have the option of turning 
linefeed on or off and of deciding whether 
or not to pass control characters. By 
"pass," I mean to go ahead and pass 
control characters to the buffer. The op- 
tion is to not pass them to the buffer by 
screening them out first. If they are not 
passed (default), the system will react to 
them. For examples, if a linefeed is re- 
ceived a linefeed will be executed. 

A similar option is the "character trap- 
ping" option. This allows you to "trap" 
certain characters you don't want on 
your screen. If you want to trap charac- 
ters, designate the Boolean operation 
(GT, EQ, LT) and the character value. 
Each character received will be tested. 

For uploading you will often want to 
set up your terminal so a designated 
delay will take place between sending 
lines of text. Options are to delay be- 
tween lines, or to wait for a prompt be- 
fore sending a line. A prompt can be 
selected, but only one. Often, a prompt 
will consist of multiple codes. Using VIP 
Terminal, you would need to designate 
the first code of the sequence. 

Once we have set all our communica- 
tions parameters, we are ready to go on- 
line and establish our communications 
link. Selecting main menu option one, 
"communications," we see a screen that 
is set up the way we previously designat- 
ed. 

VIP Terminal also has a "graphics" 
mode which lets you download graphics. 
In this mode you will automatically be 
switched to the 32 x 1 6 display. To return 
to your selected display, press the Clear 
and Shift keys and the character "a" key, 
or return to option two on the main 
menu and reselect the display option. 
While in communications mode, you 
may return to the main menu by pressing 
SHIFT @. Returning to the menu will not 
have any effect on what is taking place 
in communications, and that means you 
can effectively leave communications on 
hold while tending to other housekeep- 
ing duties. One caution: When you re- 



turn to the communications mode the 
screen will be clear. If the other computer 
is expecting input, you should take note 
of the prompt before leaving communi- 
cations mode. 

In communications mode, the top of 
the screen displays the buffer status 
(open or closed) and the case status ("L" 
for lower and upper, and "U" for upper 
only). The buffer may be toggled on or 
off by pressing the Shift key and hitting 
the Left Arrow key. 

To open communications with Compu- 
Serve, dial the local CompuServe number 
and initiate log-on procedures. Enter com- 
munications mode, connect to the local 
number, and get the prompt to enter our 
user identification. Since we programmed 
KSM1 for this, simultaneously press the 
Clear and " 1 " keys. We'll be asked for our 
password. We programmed KSM2 for 
that, so simultaneously press the Clear 
and "2" keys. Once logged on, we follow 
CompuServe procedure to upload our 
file. When ready to upload, press the Shift 
and Left Arrow keys. When uploading is 
complete, we receive a prompt from the 
host. 

To download a file, we open the buffer 
and begin receiving. To clear the buffer, 
we use option three from the main menu. 
That will give us a fresh start. To down- 
load, we may also want to use the "auto 
buffer" option (made available during 
the clear buffer operation). "Auto buf- 
fer" allows for the automatic capture of 
data sent by most bulletin boards or on- 
line databases. Using the auto buffer op- 
tion, you need not manually open and 
close the buffer. That is done automati- 
cally from the host that is downloading. 

Once the new file is in the buffer, we 
may use the disk commands to save the 
file to disk. 

VIP Terminal handles even more fea- 
tures than all these. Numerous combina- 
tions of features can be used to other ad- 
vantages. 

The documentation that accompanies 
the VIP package is outstanding. It is of 
professional quality and comes in a 
three-ring looseleaf binder. I have found 
very little that I have not been able to do 
with this program. Its weak points are 
minor when compared to its overall power. 

I recommend VIP Terminal to anyone 
who is serious about using the power of 
the microcomputer for data communica- 
tions. It represents a significant upgrade 
over earlier versions of Super Color Ter- 
minal. 

— by Norman Garrett 
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PowerMAX 

Panamax 

150 Mitchell Blvd. 

San Rafael, CA 94903 
(800)472-5555 



PowerMAX does more than 
protect your computer system 
from power spikes, surges, and 
radio frequency interference. 

It switches from ac power to 
its batteries in the case of a 
power interruption or failure. 

It provides 200 watts for up 
to 15 minutes, giving you time 
to effect an orderly shut down. 
When power is restored it au- 
tomatically switches back to 
ac voltage. PowerMAX comes 
with audio and visual alarms 
that go off during outages. It 
also lets you know how much 
standby emergency power time 
is left. Its battery is rechargable. 
The unit costs $429. 



Chess-D 

Computer Systems Distributors 

Box 9769 

Anaheim, CA 92802 
(714)772-1390 

Got the urge to play chess but 
no one to play with? Computer 
Systems is distributing Chess-D 
for Software Dynamics, a sep- 
arate Anaheim firm. You'll need 
64K of RAM to run this pro- 
gram, which inspects thou- 
sands of moves per second and, 
in tournament mode (three 
minutes per move) can look 
ahead at least five plays. You 
can change the look ahead level 
at any point during play from 
novice to expert. En Passant, 
castling, and promotion moves 
are all recognized. Moves are 
entered on the keyboard via 
algebraic notations. You can 
be black or white or change 
sides in the middle of the game. 



Chess-D costs $39.95 on cas- 
sette, $49.95 on disk. 



Skipcounting 

B5 Software 
102 Bainbridge Place 
Columbus, OH 43228 
(614)276-2752 

To help elementary school chil- 
dren better learn mathematical 
concepts, B5 is marketing 
Skipcounting. Kids pick a num- 
ber range anywhere from zero 
to 9,999,999, and then pick a 
number to "count" by; that 
number can be any number 
from one through 10, or any 
one of the following: 15, 20, 
50, 100, or 1000. Then they 
watch the computer run 
through its paces, or use it to 
check their own work. Students 
can count backwards with this 
program, too. Lessons end with 



a counting song and a graphics 
reward. The program requires 
Extended Basic and costs 
$16.95 cassette, $18.95 disk. 



Time Fighter 

Mark Data Products 
24001 Alicia Parkway #207 
Mission Viejo, CA 92691 
(714)768-1551 

Arcade action for 1 6K Color 
Computers in Time Fighter 
means you must destroy the 
Time Guardian at the end of 
the time tunnel while piloting 
your MD-64 fighter. You must 
first, of course, fight aerial dan- 
gers from other time zones. 
This assembly language game 
can be played by one or many 
players. Joysticks are needed. 

It costs $24.95 for 1 6K cassette 
systems, $27.95 for 32K disk 
systems. 
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Number Kruncher 

Moonshot Acres Software 
Box 423 

Rockfield, KY 42274 

Number Kruncher, when ap- 
pended to another financial 
program, lets you do calcula- 
tions on a section of the screen 
while the main program is run- 
ning. That screen's section can 
be of different sizes (from nine 
to 1 3 percent of the whole 
screen) and in different loca- 
tions. It eliminates the need 
fora hand-held calculator, and 
can also be used independently. 
This program costs $7.95 and 
will run in 1 6, 32, and 64K and 
on any version of the Color 
Computer. 



Intelligent Disks 

Omni Resources, Inc. 

50 Howe 

Millbury, MA01527 
(617)1865-4451 

Heat and humidity are the bane 
of all disks, and account for 
the loss of data in many situa- 
tions. Omni believed that 
attaching heat and humidity 
sensors would be a step in the 
right direction. The firm also 
figured that extra strict specifi- 



cations ought to be adhered 
to during disk manufacturing 
to reduce the chances of mal- 
function during use; hence, 
Intelligent Disks. Patents are 
pending on the sensors used 
in this new product. Each sensor 
is the type that changes color 
when conditions reach a certain 
point. The gray-white heat sen- 
sor turns black a set number 
of degrees below the 125 de- 
gree Fahrenheit danger point; 
the blue humidity sensor turns 
gray, then pinkish, then full pink 
as the humidity level reaches 
its danger point. Signal level 
tests for the disks are conducted 
at more than 50 percent be- 
yond industry standards, Omni 
says, and each disk comes with 
a lifetime warranty. The 
suggested retail price for a box 
of 10 single-sided, double-den- 
sity disks starts at $52.50. 



Your Color Computer 

Sybex 

2344 Sixth Street 
Berkeley, CA 94710 
(415)848-8233 

Author Doug Mosher has 
another book out. Your Color 
Computer, a 350-page general 
text on the Color Computer 
t more 



0 



PRO-COLOR-SERIES 




PRO-COLOR-FILE 



Enhanced 



$79.95 D 




This high level data base development program offers the 
ability to track any type of information. From Mailing 
Lists to Expense Records, to Inventory or Court Trials, 
PRO-COLOR-FILE has the versatility to handle it. 



60 Data fields 
Upto 1020 Bytes per record 
Use 1-4 Disk Drives 
4 Color Data Entry Screens 
28 User defined Equations 
Scan File Alphabetically 
Duplicate records 
Duplicate fields 

See Reviews in: 



8 Report formats 
Summary Reports 
Screen Reports 
Page titles, numbering 
Sort on any Field 
Sort 3 Fields at once 
Sort any size file 
Select sub-sets of file 




Color Computer News - June 83 
Hot Co Co -- August 83 
Rainbow Magazine - June 83 





PRO-COLOR-FORMS * NEW * $39.95 D 



Generate customized letters by merging PRO-COLOR-FILE 
data files with a letter. Print a personalized letter to every- 
one on your list. PRO-COLOR-FORMS will place data 
anywhere on a full page, even within the text of a letter. 

Embedded control codes 32 to 133 characters 

6 User designed forms 7 to 66 lines 



Have your data printed on pre-printed forms or design your 
own. Requires PRO-COLOR-FILE to use. 





PRO-COLOR-DIR 



* NEW * 



$24.95 D 




Compile a master listing of all your directories in one 
data file. This utility program will read a diskette's 
directory and place the information in one master file. 
PRO-COLOR-FILE is then used to generate reports or 
search and update. PRO-COLOR-DIR will store: 



Diskette ID name 
File name/Extension 
File type (Basic, ML, Data) 
Number of Sectors allocated 
ML Load and Execute address 



Date Created 

Date Updated 

Number of Grans allocated 

Number of Sectors used 

ML file length 



Store 1000 entries! Requires PRO-COLOR-FILE to use. 





See your local dealer or send check or money order to: 
Derringer Software, P.O. Box 5300, Florence, SC 29502 
Visa, MasterCard customers call (803) 665-5676 after 6 pm. 
Add $2.00 for Shipping and Handling No C.O.D.'s 





PRO-COLOR-FILE, PRO-COLOR-DIR, 
PRO-COLOR-FORMS (C) 1983 
Derringer Software 

All programs require 32k Color Computer Disk System 
(Does not require joysticks!) 



J 
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intended to help users learn 
about everything from setting 
up to programming. Chapter 
titles include: The Mind and 
Body of a Color Computer, Pro- 
grams You Can Buy/Services 
You Can Call Up, Learning How 
to Program, and Ideas for the 
Future. The book also contains 
programs, cartoons, diagrams, 
and color photographs. It costs 
$12.95. 



The Wire Tree 

Networx 

203 Harrison Place 
Brooklyn, NY 11237 
(212)821-7555 

The Wire Tree is a four-outlet 
filtered power source designed 
to protect personal computers 
against voltage surges, spikes, 
and radio frequency interfer- 
ence. Surge limiting circuitry is 
built into its grounded outlets. 
The same circuit absorbs spikes 



with rapid decreases in impe- 
dance. Radio interference is 
blocked with a filter that cuts 
out transverse and common 
mode noise. The Wire Tree 
comes with a nine-foot cable 
power cord, four peripheral 
power cords, and a one-year 
warranty. It costs $69.95. 



Software 
Printer Spooler 

Software Connection, Inc. 

5460 North State Road #108 
Fort Lauderdale, FL 33319 
(305)484-7547 

The Software Printer Spooler 
gives you a 9.5K printer buffer 
on a 64K tape-based Color 
Computer. It's an assembly lan- 
guage program that frees your 
computer to work on other 
things while your printer prints 
at its leisure. It costs $15.95. 



-rnmFOR...NEXT (04,83) 

A PRIL FOOLS ! That is — do be sure to read our April 
issue. Dennis Kitsz has planned the game of Life in 
Color ... We'll have new adventures of the Sorcerer's appren- 
tices ... some nifty game programs (including more Summer 
Project winners) ... and the finest in computer fiction — "Be- 
hind The Fallen Gate." We'll also take a close look at robotics, 
as well as continue our usual favorites. All in all, an issue you 
won't want to miss! ■ ■ ■ 
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TeleResponse Page 

TeleResponse is here! It’s a new, fast, and easy way for you to get the information you want, when you want it. 



How does it work? Like the Reader Service Card of the past, when advertised products tickle your fancy, jot their numbers 
down in the spaces below. Then pick up your phone and dial 1-800-CALL-800. We pick up the cost of the phone call, and your 
request for information is passed on to the products’ manufacturers quickly and efficiently. 



BEFORE you reach for the telephone: 

1) Review the entire magazine for products you’d like to add to your Color Computer; 

2) Enter in the RED shaded area below advertiser code numbers which follow the s symbol near those ads which interest you; 

3) For each information packet you request, please enter in the GREEN shaded area one of the following: 

10 = I plan to purchase within 30 days 

20 = I may purchase within 6 months 
30 = I need information for my files 

4) In exchange for the information you’re requesting, you can provide valuable input to us and our advertisers regarding your 
future needs and objectives. Please take a moment now to review this month’s Reader Survey. Enter your response to each 
question in the BLUE shaded area. That’s all there is to it. 

Now, dial toll-free 1-800-CALL-800 and go for it! 



This is Issue #10-03 

Code Statu s Surv ey 




Reader Survey 

A. What is your present system’s memory capacity? 

1.64K 2.32K 3. 16K 4. 4K 

B. Is your system configured for: 1. Color Basic 

2. Extended Color Basic 3. OS/9 4. Basic 09? 

C. Do you own: 1. Diskdrives 2. Printer 

3. Modem 4. Joysticks 5. Multi-pak interface 
6. Plotter 7. Light pen? 

D. What do you plan to buy during the next six months? 

1. More memory 2. Upgraded ROM 3. Printer 

4. Modem 5. Disk drives 6. Multi-pak interface 

E. What do you use your computer for? 

1. Adult learning tool 2. Child’s learning tool 

3. Small business or home management 

4. Games 5. Programming 

F. In reading The Color Computer Magazine, what are 
your major editorial interests? 

1. Educational programs 

2. Home management and small business applications 

3. Hardware projects 4. Games 

5. Telecommunications 6. Peripheral information 



Readers outside the continental U.S. only may call 207-596-0501 . 
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TO: The Color Computer Magazine Readers 
FROM : Kerry Leichtman 
RE: End of File 
DATE: March 1984 



|MgUJijBareating The Color Computer Magazine month after month has been and continues to 
fun. It seems like we've been at it for years: many years. This March issue represents 
H K5ifflB Qur f* rst birthday. Much has happened to the magazine and the Color Computer since that 

IUmsQb Volume 1, Number 1 totalled 68 pages and reached 30,000 of the (guesstimated) 
300,000 Color Computerists in the United States and abroad. This 160 page issue will reach at least 
6 5,000 of the world's 650,000 Color Computer owners. We take pride in all these growth figures. 

A year ago there was one TRS-80 Color Computer. Now there's the 64K Color Computer, Color Com- 
puter 2 Standard and Extended, MC-10, and before 1984 is through the Color Computer will birth 
multiple offspring. Our now retired mercedes silver friend has spouted a family of computers that is, 
more than it was a year ago, the best general purpose home computer available today. Mine is not 
a biased opinion ; it is what I truly believe. 

Although it is our birthday and not the Color Computer's, this March issue is a milestone of many 
sorts. We'll celebrate it simply, by pledging to continue our dedicated coverage of your machine. We'll 
celebrate by thanking (unnamed) the many folks responsible for the creation, distribution, and innova- 
tive enhancements to the Color Computer, and by thanking Barry Thompson, Mark Yamagata, and 
Ed Juge of Tandy for continuing to believe in and support the Color Computer. 

Yet another milestone we are celebrating: You may have noticed a substantial change in our mast- 
head (the small-type listing in the front of the magazine, listing our staff). In December The Color Com- 
puter Magazine joined the Ziff-Davis family of computer magazines. Our new relatives include Crea- 
tive Computing , PC, Microsystems, A +, Computers & Electronics, and many, many more. This is our 
first issue published under new ownership. Our editorial offices remain in Camden, Maine. We are 
happy, in fact mildly ecstatic, over the resources now available to us through Ziff-Davis. We will share 
them with you in future pages. 

Your support has made us the largest circulated magazine serving the Color Computer. We thank 
you and wish you a happy birthday, too. 




:ditdf-in-Chief 



Ziff-Davis Publishing Company / Highland Mill / Camden, Maine 04843 / (207)236-9621 
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Compare it with the rest. 
Then, buy the best. 



If you’ve been thinking about 
spending good money on a new 
keyboard for your Color Computer, 
why not get a good keyboard for 
your money? 

Designed from scratch, the 
HJL-57 Professional Keyboard 
is built to unlock ALL the 
potential performance of your 
Color Computer. Now, you can 
do real word processing and sail 
through lengthy listings. ..with 
maximum speed; minimum errors. 

At $79.95, the HJL-57 is reason- 
ably priced, but you can find 
other CoCo keyboards for a few 
dollars less. So, before you buy, 
we suggest that you compare. 

Compare Design. 

The ergonomically-superior 
HJL-57 has sculptured, low 
profile keycaps; and the three- 
color layout is identical to 
the original CoCo keyboard. 

Compare Construction. 

The HJL-57 has a rigidized 
aluminum baseplate for solid, 
no-flex mounting. Switch contacts 
are rated for 100 million cycles 
minimum, and covered by a spill- 
proof membrane. 



Compare Performance. 

Offering more than full-travel, 
bounce-proof keyswitches, the 
HJL-57 has RFI/EMI shielding that 
eliminates irritating noise on 
displays; and four user-definable 
function keys (one latchable), 
specially-positioned to avoid 
inadvertent actuation. 



Free Function Key Program 

Your HJL-57 kit includes usage 
instructions and decimal codes 
produced by the function keys, 
plus a free sample program 
that defines the function 
keys as follows: FI = Screen 
dump to printer. F2 = Repeat 
key (latching). F3 = Lowercase 
upper case flip (if you have 
lower case capability). F4 = 
Control key; subtracts 64 from 
the ASCII value of any key 
pressed. Runs on disc or tape; 
extended or standard Basic. 



Compare Installation. 

Carefully engineered for easy 
installation, the HJL-57 requires 
no soldering, drilling or gluing. 
Simply plug it in and drop it 
right on the original CoCo 



mounting posts. Kit includes a 
new bezel for a totally finished 
conversion. 

Compare Warranties. 

The HJL-57 is built so well, it 
carries a full, one-year warranty. 
And, it is sold with an exclusive 
15-day money-back guarantee. 

Compare Value. 

You know that a bargain is a 
bargain only so long as it lasts. 

If you shop carefully, we think 
you will agree. ..The HJL-57 is 
the last keyboard your CoCo will 
ever need. And that’s real value. 

Order Today. 

Only $79.95, the HJL-57 is 
available for immediate shipment 
for either the original Color 
Computer (sold prior to October, 
1982) or the F-version and TDP-100 
(introduced in October, 1982), 
and the new 64K CoCo. Now also 
available for CoCo 2. 



Order by Phone Anytime 
716 - 235-8358 
24 hours, 7 days a week 




PRODUCTS INC. 



955 Buffalo Road • P .0. Box 24954 
Rochester, New York 14624 



Ordering Information: Specify model (Original, F-version, or CoCo 2). Payment by C.O.D., check, 
MasterCard or Visa . Credit card customers include complete card number and expiration date. Add 
$2.00 for shipping ($3.50 for Canada). New York state residents add 7% sales tax. 

Dealer inquiries invited. For dealer information in Eastern U.S. and Canada, call collect: 
617-583-7614, Advanced Computer Services (distributor), 74 Plain Street, Brockton, MIA 02401. 





A full line of top-quality floppies, in virtually every 5 1 A" and 8" model, for compatibility with virtually every computer on the market. 
Guaranteed to meet or exceed every industry standard, certified 100% error- free and problem- free, and to maintain its quality for at least 11 million passes 

(or over a lifetime of heavy-duty use). 




Dennison 



S Enter 90 on TeleResponse page 159 




